S
stephane46
Guest
Bonjour,
Débutant en programmation Excel, je bute sur un problème sûrement des plus simples....
Plateforme Mac OSX - Excel 2004 pour mac:
J'ai crée un Formulaire (Userform1) pour "remplir une feuil de calcul Feuil2
J'ai programmé le bouton valider de la mamière suivante :
num est une variable qui me permet de savoir quelles lignes est "libre"
Par ex pour les zones de texte
Ce formulaire marche très bien dans ce sens.
Je voudrais lorsque l'on clique sur une ligne de la feuil2, le résultat s'affiche dans l'userform.
Donc
Je pensais "naïvement " que le fait d'inverser les commandes me remplirais automatiquement mon formulaire..
J'avoue ne pas comprendre et je ne sais plus dans quelle direction m'orienter.
J'espère que vous pourrez me venir en aide...
Cordialement - stéphane
Débutant en programmation Excel, je bute sur un problème sûrement des plus simples....
Plateforme Mac OSX - Excel 2004 pour mac:
J'ai crée un Formulaire (Userform1) pour "remplir une feuil de calcul Feuil2
J'ai programmé le bouton valider de la mamière suivante :
num est une variable qui me permet de savoir quelles lignes est "libre"
Code:
num = Sheets("feuil2").Range("A65536").End(xlUp).Row + 1
Code:
Sheets("feuil2").Activate
Code:
Range("A" & num).Value = Territoire.Value
Range("B" & num).Value = Auteur.Value
Range("C" & num).Value = Maitre_O.ValueJe voudrais lorsque l'on clique sur une ligne de la feuil2, le résultat s'affiche dans l'userform.
Donc
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
UserForm1.Show 'Pour afficher le Formulaire
'Pour récupérer le N° de ligne :
Dim L As Integer
L = ActiveCell.Row
Territoire.Value = Range("A" & L).Value
Auteur.Value = Range("B" & L).Value
Maitre_O.Value = Range("C" &L).ValueJ'avoue ne pas comprendre et je ne sais plus dans quelle direction m'orienter.
J'espère que vous pourrez me venir en aide...
Cordialement - stéphane