Trouvez les détails contre en double-cliquant sur une touche particulière

Pouvez-vous m'aider avec ce problème?

Je veux écrire un programme VBA où lorsque je clique sur une key particulière dans sheet1, il va à la database et me find les détails associés à la key particulière.

La database est une feuille Excel appelée PSN.

J'ai écrit mon code ci-dessous, ce qui ne va pas.

• Type de graphique par ordre croissant
• adaptateur de données remplissez avec une feuille de calcul sans append toutes les colonnes
• XSSFWorkbook ne charge pas un petit file Excel
• Comment lire un file Excel MS en utilisant Apache POI?
• Afficher une string de text dans la textbox en fonction de la checkbox multiple dans userform

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, Columns("E")) Is Nothing Then Cancel = True Worksheets("PSN").Activate Dim cell As Range Set cell = Range("A1:A10000").Find(Target.Value, LookIn:=xlValues) End If End Sub 

• VBA Solver n'aime pas faire attention aux contraintes
• Lecture de plusieurs files dans des pandas
• Vous searchz une macro pour le button de command ascendant et descendant avec la possibilité de maintenir les autres lignes de données correspondantes
• Comment puis-je utiliser VBA pour coller des lignes Excel distinctes l'une de l'autre dans PowerPoint?
• Modification des données étendues vers le format long – VBA. Comment choisir une feuille?

 Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) If Not Intersect(Target, Columns("E")) Is Nothing Then Cancel = True Dim cell As Range Set cell = sheets("PSN").Range("A1:A10000").Find(Target.Value, LookIn:=xlValues) End If End Sub