Dull
XLDnaute Barbatruc
Salut le Forum 🙂
C'est plutôt la dernière partie qui me pose problème "à une page précise"
Je dispose d'un fichier où la BDD est configurée de la façon suivante:
[TABLE="class: grid, width: 500"]
[TR]
[TD="align: center"]A[/TD]
[TD="align: center"]B[/TD]
[TD="align: center"]C[/TD]
[TD="align: center"]D[/TD]
[TD="align: center"]E[/TD]
[TD="align: center"]F[/TD]
[TD="align: center"]G[/TD]
[TD="align: center"]H[/TD]
[/TR]
[TR]
[TD]Code
[/TD]
[TD]Libellé
[/TD]
[TD]HT
[/TD]
[TD]TTC
[/TD]
[TD]Fournisseur
[/TD]
[TD]Type
[/TD]
[TD]conditionnement
[/TD]
[TD]page
[/TD]
[/TR]
[TR]
[TD]A3210[/TD]
[TD]Attache lettre[/TD]
[TD]0.25[/TD]
[TD]0.27[/TD]
[TD]Buro Stock[/TD]
[TD]Bureau[/TD]
[TD]Boite de 100[/TD]
[TD]67[/TD]
[/TR]
[/TABLE]
en Double cliquant dans la ColB l'USF s'ouvre bien mais à la 1ère page
ma question:
quel argument à ajouter dans le code
afin que ça tombe sur la page de la ColH
j'ai lu plusieurs posts ou on pouvait faire cela avec
mais impossible de l'intégrer à mon code
Merci pour vos contributions
PS: Fichiers à mettre dans le même dossier
Bonne Journée
C'est plutôt la dernière partie qui me pose problème "à une page précise"
Je dispose d'un fichier où la BDD est configurée de la façon suivante:
[TABLE="class: grid, width: 500"]
[TR]
[TD="align: center"]A[/TD]
[TD="align: center"]B[/TD]
[TD="align: center"]C[/TD]
[TD="align: center"]D[/TD]
[TD="align: center"]E[/TD]
[TD="align: center"]F[/TD]
[TD="align: center"]G[/TD]
[TD="align: center"]H[/TD]
[/TR]
[TR]
[TD]Code
[/TD]
[TD]Libellé
[/TD]
[TD]HT
[/TD]
[TD]TTC
[/TD]
[TD]Fournisseur
[/TD]
[TD]Type
[/TD]
[TD]conditionnement
[/TD]
[TD]page
[/TD]
[/TR]
[TR]
[TD]A3210[/TD]
[TD]Attache lettre[/TD]
[TD]0.25[/TD]
[TD]0.27[/TD]
[TD]Buro Stock[/TD]
[TD]Bureau[/TD]
[TD]Boite de 100[/TD]
[TD]67[/TD]
[/TR]
[/TABLE]
en Double cliquant dans la ColB l'USF s'ouvre bien mais à la 1ère page
ma question:
quel argument à ajouter dans le code
Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Set C = Sheets("Feuil1").Columns("B").Find(What:=Target)
If Not C Is Nothing Then Cancel = True: UserForm9.WebBrowser1.Navigate ThisWorkbook.Path & "\" & "8_burostock_cat_2010.pdf": UserForm9.Show 0
End Sub
afin que ça tombe sur la page de la ColH
j'ai lu plusieurs posts ou on pouvait faire cela avec
Code:
".../A page=" & C.Offset(, 8) & " =OpenActions..."
Merci pour vos contributions
PS: Fichiers à mettre dans le même dossier
Bonne Journée