T
totor
Guest
Bonjour tout le monde,
J' ai un petit problème lors du remplissage de cellules à partir d'un Form:
La première affectation passe très bien mais pour ttes les suivantes rien ne va.... mystère. Je suis bloqué et je ne vois pourquoi
Si qqu' un avait la réponse cela m'aiderait grandement:
voici le bout de code qui ne passe pas:
marche:
Sheets("SYNTHESE").Range("B4").Value = intro_nouvelle_etude.TextBox_nom_projet.Value
ne marche pas:
Sheets("SYNTHESE").Range("C6").Value = intro_nouvelle_etude.TextBox_projet_pour.Value
'Sheets("SYNTHESE").Range("B8").Value = intro_nouvelle_etude.TextBox_contact.Value
...pareil pour les autres cellules de la colonne
mais tout ceci passe:
Sheets("SYNT1").Range("A1").Value = intro_nouvelle_etude.TextBox_nom_projet.Value
Sheets("INV1").Range("A1").Value = intro_nouvelle_etude.TextBox_nom_projet.Value
Sheets("EXPL1").Range("A1").Value = intro_nouvelle_etude.TextBox_nom_projet.Value
Sheets("Ratio").Range("A1").Value = intro_nouvelle_etude.TextBox_nom_projet.Value
Sheets("Tarif électrique").Range("A1").Value = intro_nouvelle_etude.TextBox_nom_projet.Value
Sheets("Tarif électrique").Range("A35").Value = intro_nouvelle_etude.TextBox_nom_projet.Value
notamment les deux dernieres qui ressemblent aux premieres instructions....
merci d'avance
Totor
J' ai un petit problème lors du remplissage de cellules à partir d'un Form:
La première affectation passe très bien mais pour ttes les suivantes rien ne va.... mystère. Je suis bloqué et je ne vois pourquoi
Si qqu' un avait la réponse cela m'aiderait grandement:
voici le bout de code qui ne passe pas:
marche:
Sheets("SYNTHESE").Range("B4").Value = intro_nouvelle_etude.TextBox_nom_projet.Value
ne marche pas:
Sheets("SYNTHESE").Range("C6").Value = intro_nouvelle_etude.TextBox_projet_pour.Value
'Sheets("SYNTHESE").Range("B8").Value = intro_nouvelle_etude.TextBox_contact.Value
...pareil pour les autres cellules de la colonne
mais tout ceci passe:
Sheets("SYNT1").Range("A1").Value = intro_nouvelle_etude.TextBox_nom_projet.Value
Sheets("INV1").Range("A1").Value = intro_nouvelle_etude.TextBox_nom_projet.Value
Sheets("EXPL1").Range("A1").Value = intro_nouvelle_etude.TextBox_nom_projet.Value
Sheets("Ratio").Range("A1").Value = intro_nouvelle_etude.TextBox_nom_projet.Value
Sheets("Tarif électrique").Range("A1").Value = intro_nouvelle_etude.TextBox_nom_projet.Value
Sheets("Tarif électrique").Range("A35").Value = intro_nouvelle_etude.TextBox_nom_projet.Value
notamment les deux dernieres qui ressemblent aux premieres instructions....
merci d'avance
Totor