Lors d'une recherche, Excel trouve ce qui se trouve dans le combobox8
mais de fa=E7on partielle:
Je cherche Budget F=E9d=E9ral qui se trouve en B52 et Excel
rapporte tout le temps.... Jour 3 du budget f=E9d=E9ral qui se trouve en
B23.
J'ai essay=E9 d'incorporer MatchCase:=3DTrue apr=E8s LookIn:=3DxlValues, ma=
is
=E7a ne marche pas.
Comment faire pour qu'Excel recherche exactement ce qui est =E9crit
dans le combobox8 ?
Private Sub ComboBox8_AfterUpdate()
On Error Resume Next
Application.ScreenUpdating =3D False
Nom =3D ComboBox8
Dim c
With Sheet3.Range("Proj")
Set c =3D .Find(What:=3DNom, After:=3DSheet3.Range("B3"),
LookIn:=3DxlValues)
If Not c Is Nothing Then
fistA =3D c.Address
Application.GoTo Reference:=3DSheet3.Range(c.Address)
End If
etc........
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
JB
Bonsoir,
Set c = .Find(What:=Nom, After:=Sheet3.Range("B3"), LookIn:=xlValues,LookAt:=xlWhole)
JB
On 10 juil, 20:47, Denys wrote:
Bonjour à tous,
Lors d'une recherche, Excel trouve ce qui se trouve dans le combobox8 mais de façon partielle: Je cherche Budget Fédéral qui se trouve en B52 et Excel rapporte tout le temps.... Jour 3 du budget fédéral qui se trouve en B23.
J'ai essayé d'incorporer MatchCase:=True après LookIn:=xlValues, mais ça ne marche pas.
Comment faire pour qu'Excel recherche exactement ce qui est écrit dans le combobox8 ?
Private Sub ComboBox8_AfterUpdate() On Error Resume Next Application.ScreenUpdating = False Nom = ComboBox8 Dim c With Sheet3.Range("Proj") Set c = .Find(What:=Nom, After:=Sheet3.Range("B3"), LookIn:=xlValues) If Not c Is Nothing Then fistA = c.Address Application.GoTo Reference:=Sheet3.Range(c.Address) End If etc........
Merci
Denys
Bonsoir,
Set c = .Find(What:=Nom, After:=Sheet3.Range("B3"),
LookIn:=xlValues,LookAt:=xlWhole)
JB
On 10 juil, 20:47, Denys <denys.perrea...@rbc.com> wrote:
Bonjour à tous,
Lors d'une recherche, Excel trouve ce qui se trouve dans le combobox8
mais de façon partielle:
Je cherche Budget Fédéral qui se trouve en B52 et Excel
rapporte tout le temps.... Jour 3 du budget fédéral qui se trouve en
B23.
J'ai essayé d'incorporer MatchCase:=True après LookIn:=xlValues, mais
ça ne marche pas.
Comment faire pour qu'Excel recherche exactement ce qui est écrit
dans le combobox8 ?
Private Sub ComboBox8_AfterUpdate()
On Error Resume Next
Application.ScreenUpdating = False
Nom = ComboBox8
Dim c
With Sheet3.Range("Proj")
Set c = .Find(What:=Nom, After:=Sheet3.Range("B3"),
LookIn:=xlValues)
If Not c Is Nothing Then
fistA = c.Address
Application.GoTo Reference:=Sheet3.Range(c.Address)
End If
etc........
Set c = .Find(What:=Nom, After:=Sheet3.Range("B3"), LookIn:=xlValues,LookAt:=xlWhole)
JB
On 10 juil, 20:47, Denys wrote:
Bonjour à tous,
Lors d'une recherche, Excel trouve ce qui se trouve dans le combobox8 mais de façon partielle: Je cherche Budget Fédéral qui se trouve en B52 et Excel rapporte tout le temps.... Jour 3 du budget fédéral qui se trouve en B23.
J'ai essayé d'incorporer MatchCase:=True après LookIn:=xlValues, mais ça ne marche pas.
Comment faire pour qu'Excel recherche exactement ce qui est écrit dans le combobox8 ?
Private Sub ComboBox8_AfterUpdate() On Error Resume Next Application.ScreenUpdating = False Nom = ComboBox8 Dim c With Sheet3.Range("Proj") Set c = .Find(What:=Nom, After:=Sheet3.Range("B3"), LookIn:=xlValues) If Not c Is Nothing Then fistA = c.Address Application.GoTo Reference:=Sheet3.Range(c.Address) End If etc........
Merci
Denys
Denys
Bonsoir JB,
Dis-donc, t'en as mis du temps !!!! :-)
Merci beaucoup c'est exactement ce dont j'avais besoin....
Denys
Bonsoir JB,
Dis-donc, t'en as mis du temps !!!! :-)
Merci beaucoup c'est exactement ce dont j'avais besoin....
