Bonjour,
j'ai commencé à m'intéresser au VBA il y a une semaine pour des besoins au boulot (rien à voir avec l'informatique). J'ai créée un Userform multipage pour remplir une feuille excel.
Mon premier onglet me sert à insérer des données dans ma première feuille ("ordonnancier") avec des Combobox.
Mon deuxième onglet me permet d'ajouter des données dans une deuxième feuille ("données") dans des colonnes qui sont définies par la fonction "decaler" (je ne voulais pas avoir à redéfinir la taille des colonnes à chaque fois)
Mon problème se situe sur le dernier onglet, je cherche à trouver le moyen pour supprimer une des valeurs de ma feuille "données". Pour l'instant je suis passé par la création de Combobox pointant vers ma liste de données et je voudrais sélectionner un Nom et quand je clique sur un bouton Effacer, il me supprime la cellule de la colonne correspondante.
Je ne sais pas si je dois passer par une boucle ou autre chose...
j'ai essayé en passant par d'autres forums des lignes du type :
Private Sub BTdel_patient_Click()
Dim DelPatient As String
DelPatient = ComboBox_DelPatient.Value
For Each Cellule In Range("données!liste_patient")
If Cellule.Value = DelPatient Then
Cellule.Delete
End If
Next
End Sub
Mais il me renvoie une erreur de type 13 Incompatibilité de type.
Cela ne m'aide pas beaucoup...
Voilà si quelqu'un pouvait me donner un coup de pouce ou m'indiquer comment faire cela m'intéresse vivement (Désolé je ne peux pas joindre le fichier car il est lié à un fichier excel de plus d'1 Mo...)
Merci d'avance.
Barbi14
j'ai commencé à m'intéresser au VBA il y a une semaine pour des besoins au boulot (rien à voir avec l'informatique). J'ai créée un Userform multipage pour remplir une feuille excel.
Mon premier onglet me sert à insérer des données dans ma première feuille ("ordonnancier") avec des Combobox.
Mon deuxième onglet me permet d'ajouter des données dans une deuxième feuille ("données") dans des colonnes qui sont définies par la fonction "decaler" (je ne voulais pas avoir à redéfinir la taille des colonnes à chaque fois)
Mon problème se situe sur le dernier onglet, je cherche à trouver le moyen pour supprimer une des valeurs de ma feuille "données". Pour l'instant je suis passé par la création de Combobox pointant vers ma liste de données et je voudrais sélectionner un Nom et quand je clique sur un bouton Effacer, il me supprime la cellule de la colonne correspondante.
Je ne sais pas si je dois passer par une boucle ou autre chose...
j'ai essayé en passant par d'autres forums des lignes du type :
Private Sub BTdel_patient_Click()
Dim DelPatient As String
DelPatient = ComboBox_DelPatient.Value
For Each Cellule In Range("données!liste_patient")
If Cellule.Value = DelPatient Then
Cellule.Delete
End If
Next
End Sub
Mais il me renvoie une erreur de type 13 Incompatibilité de type.
Cela ne m'aide pas beaucoup...
Voilà si quelqu'un pouvait me donner un coup de pouce ou m'indiquer comment faire cela m'intéresse vivement (Désolé je ne peux pas joindre le fichier car il est lié à un fichier excel de plus d'1 Mo...)
Merci d'avance.
Barbi14