Remplir une cell en fonction du nom de la première lig d'une col
Fermé
Kusco
Messages postés
466
Date d'inscription
vendredi 4 janvier 2008
Statut
Membre
Dernière intervention
15 décembre 2014
-
8 nov. 2013 à 12:10
Kusco Messages postés 466 Date d'inscription vendredi 4 janvier 2008 Statut Membre Dernière intervention 15 décembre 2014 - 13 nov. 2013 à 08:41
Kusco Messages postés 466 Date d'inscription vendredi 4 janvier 2008 Statut Membre Dernière intervention 15 décembre 2014 - 13 nov. 2013 à 08:41
A voir également:
- Remplir une cell en fonction du nom de la première lig d'une col
- Trouver une adresse avec un nom de famille gratuit ✓ - Forum Mobile
- Fonction si et - Guide
- Nom de l'adresse - Forum Réseaux sociaux
- Trouver un numéro de portable avec un nom ✓ - Forum Mobile
- Le nom du champ de tableau croisé dynamique n'est pas valide ✓ - Forum Excel
2 réponses
melanie1324
Messages postés
1505
Date d'inscription
vendredi 25 mai 2007
Statut
Membre
Dernière intervention
31 janvier 2018
154
8 nov. 2013 à 13:10
8 nov. 2013 à 13:10
Bonjour,
c'est possible mais il faut que tu fasses une boucle avec des variables.
Je prends l'exemple suivant pour que cela soit plus clair, un tableau :
col A : nom
col B : le prénom
col C : date de naissance
Pour savoir dans quelle colonne sont tes libellés :
sub libellés
dim nom, prenom, naissance as variant
col = 1
do while cells(1,col) = ""
if cells(1,col) = "Nom" then
Nom = col
end if
if cells(1,col) = "Prénom" then
Prénom = col
end if
if cells(1,col) = "Date de naissance" then
naissance = col
end if
cells(no_ligne,nom) = textbox1
cells(no_ligne, prenom) = textbox2
cells(no_ligne,naissance) = textbox3
end sub
c'est possible mais il faut que tu fasses une boucle avec des variables.
Je prends l'exemple suivant pour que cela soit plus clair, un tableau :
col A : nom
col B : le prénom
col C : date de naissance
Pour savoir dans quelle colonne sont tes libellés :
sub libellés
dim nom, prenom, naissance as variant
col = 1
do while cells(1,col) = ""
if cells(1,col) = "Nom" then
Nom = col
end if
if cells(1,col) = "Prénom" then
Prénom = col
end if
if cells(1,col) = "Date de naissance" then
naissance = col
end if
cells(no_ligne,nom) = textbox1
cells(no_ligne, prenom) = textbox2
cells(no_ligne,naissance) = textbox3
end sub
Kusco
Messages postés
466
Date d'inscription
vendredi 4 janvier 2008
Statut
Membre
Dernière intervention
15 décembre 2014
336
8 nov. 2013 à 14:01
8 nov. 2013 à 14:01
Bonjour,
Cela veut dire qu'il faut que je mette la fonction "sub libellés" en fonction public ou que je déclare mes variable de manière public ou .... comment faire ?
Merci en tous cas pour ce début de réponse qui va énormément m'aider !
Cela veut dire qu'il faut que je mette la fonction "sub libellés" en fonction public ou que je déclare mes variable de manière public ou .... comment faire ?
Merci en tous cas pour ce début de réponse qui va énormément m'aider !
8 nov. 2013 à 14:02
mais tu n'es pas obligé d'en faire une macro spécifique.
8 nov. 2013 à 14:27
Merci !
8 nov. 2013 à 14:51
et dans tes userforms, tu fais appelles à cette marco en mettant :
call macro_libellé
8 nov. 2013 à 14:56
Donc par exemple :
Et pour le userform je mets dans la fonction sub userform_initialize la fonction
Ou ce serait plutôt dans un autre endroit qu'il faudrait l'appeler ?
8 nov. 2013 à 15:05
Normalement,cadevrait marcher.