Bonjour
j'ai un petit souci avec ma macro recherche haut
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$3" Or Target.Address = "$B$3" And Target.Count = 1 Then
If [A3] <> "" And [B3] <> "" Then
ChampFormule = "H3:H104"
chemin = Range("A3")
Fichier = Range("B3")
NomTableRecherche = "$D:$AS"
If Dir(chemin & "\" & Fichier) <> "" Then
Range(ChampFormule).Formula = _
"=HLOOKUP($H$2," & "'" & chemin & "\" & Fichier & "'!" & NomTableRecherche & ",LIGNE(3:3),FALSE)"
Else
MsgBox "fichier inconnu"
End If
End If
End If
End Sub
a l'écriture ligne(3:3) est en minuscule et me produit une erreur #nom?
comment puis je faire pour qu'il reste en majuscule
merci