Bonjour,
j'ai créé un fichier moteur recherche 3 et un fichier agenda
dans le fichier moteur recherche j'ai créé un formulaire ajout de contact qui rempli une feuille donnée c'est ce qui suit:
Private Sub CmdAjouter_Click()
Dim numLigneVide As Integer
'On active la feuille donnée
Worksheets("Donnée").Activate
'On trouve la dernier ligne vide du tableau et on enregistre le numero de la ligne dans la variable numLigneVide
numLigneVide = ActiveSheet.Columns(1).Find("" ).Row
'On vérifie que les champs obligatoire sont correctement remplis
If TxtNom.Text = "" Then
MsgBox "Veuillez remplir le nom de votre contact", vbCritical, "Champs manquants"
TxtNom.SetFocus
maintenant j'ai fait un copier coller du bouton ajout contact dans mon fichier agenda et la ça c'est compliqué j'ai essayé plusieurs chose vu sur le forum, je n'arrive pas à enregistrer mon nouveau contact dans mon classeur moteur recherche
j'ai essayé en ajoutant une ligne Workboot...activate et une du style Dim..
je pense qu'i faut mettre quelque chose avant "On active feuille donnée" mais quoi ? là est le mystere pour moi
Si quelqu'un pouvait m'aider à résoudre ce petit problème
Un grand merci
-----