VBA BOUCLE IF
Résolu/Fermé
gregg1712
Messages postés
45
Date d'inscription
dimanche 20 décembre 2009
Statut
Membre
Dernière intervention
7 juillet 2022
-
Modifié par gregg1712 le 21/12/2011 à 09:03
gregg1712 Messages postés 45 Date d'inscription dimanche 20 décembre 2009 Statut Membre Dernière intervention 7 juillet 2022 - 21 déc. 2011 à 09:52
gregg1712 Messages postés 45 Date d'inscription dimanche 20 décembre 2009 Statut Membre Dernière intervention 7 juillet 2022 - 21 déc. 2011 à 09:52
2 réponses
Phoenellion
Messages postés
116
Date d'inscription
dimanche 14 septembre 2008
Statut
Membre
Dernière intervention
30 août 2012
33
Modifié par Phoenellion le 21/12/2011 à 09:14
Modifié par Phoenellion le 21/12/2011 à 09:14
Bonjour gergg1712
je ne vois pas comment tu as déclaré te variables mais y a un truc qui me chiffonne :
Quand tu écris
fr c'est une variable ou une donnée récupérée par ta box ?
car si tel est le cas, fr est une chaine de caractère (String) et pour être reconnue en tant que tel, tu dois écrire :
pareil pour nl => "nl"
essaye et dis voir...
@+
Phoe
je ne vois pas comment tu as déclaré te variables mais y a un truc qui me chiffonne :
Quand tu écris
If Langue = fr Then
fr c'est une variable ou une donnée récupérée par ta box ?
car si tel est le cas, fr est une chaine de caractère (String) et pour être reconnue en tant que tel, tu dois écrire :
If Langue = "fr" Then
pareil pour nl => "nl"
essaye et dis voir...
@+
Phoe
gregg1712
Messages postés
45
Date d'inscription
dimanche 20 décembre 2009
Statut
Membre
Dernière intervention
7 juillet 2022
2
21 déc. 2011 à 09:37
21 déc. 2011 à 09:37
Mais un dernier truc quand je rajoute à la fin:
ActiveCell.Offset(1, -3).Select
Pour aller à la ligne en bas, ca ne marche pas, ca marque une erreur 404
ActiveCell.Offset(1, -3).Select
Pour aller à la ligne en bas, ca ne marche pas, ca marque une erreur 404
gregg1712
Messages postés
45
Date d'inscription
dimanche 20 décembre 2009
Statut
Membre
Dernière intervention
7 juillet 2022
2
21 déc. 2011 à 09:41
21 déc. 2011 à 09:41
ca doit être mes
ActiveCell.Offset(0, 0).Value = Nom
ActiveCell.Offset(0, 1).Value = Langue
ActiveCell.Offset(0, 2).Value = Montant
ActiveCell.Offset(0, 3).Value = Salaire
ActiveCell.Offset(0, 4).Value = Carte
ActiveCell.Offset(0, 5).Value = Pub
Qui empeche un
ActiveCell.Offset(1, -3).Select
a la fin
L'ordre ou l'on place les Active.Offeset change la donne ? :)
ActiveCell.Offset(0, 0).Value = Nom
ActiveCell.Offset(0, 1).Value = Langue
ActiveCell.Offset(0, 2).Value = Montant
ActiveCell.Offset(0, 3).Value = Salaire
ActiveCell.Offset(0, 4).Value = Carte
ActiveCell.Offset(0, 5).Value = Pub
Qui empeche un
ActiveCell.Offset(1, -3).Select
a la fin
L'ordre ou l'on place les Active.Offeset change la donne ? :)
chossette9
Messages postés
4239
Date d'inscription
lundi 20 avril 2009
Statut
Contributeur
Dernière intervention
12 septembre 2014
1 308
21 déc. 2011 à 09:45
21 déc. 2011 à 09:45
C'est surtout que les premiers ActiveCell.Offset ne te font pas changer de cellules (si tu es en A1 avant tes premiers activeCell, tu écris le nom en A1, la langue en A2, le montant en A3 etc.)
Tandis que ton ActiveCell.Offset(,).Select change la cellule. Du coup si tu es en A1 au départ, tu veut te retrouver ligne 2, colonne -2, ce qui ne fonctionne pas.
Il faut voir ce que tu veux faire après avoir entré les valeurs dans tes cellules. Tu veux passer à la ligne ?
Tandis que ton ActiveCell.Offset(,).Select change la cellule. Du coup si tu es en A1 au départ, tu veut te retrouver ligne 2, colonne -2, ce qui ne fonctionne pas.
Il faut voir ce que tu veux faire après avoir entré les valeurs dans tes cellules. Tu veux passer à la ligne ?
gregg1712
Messages postés
45
Date d'inscription
dimanche 20 décembre 2009
Statut
Membre
Dernière intervention
7 juillet 2022
2
21 déc. 2011 à 09:47
21 déc. 2011 à 09:47
Oui voila
Phoenellion
Messages postés
116
Date d'inscription
dimanche 14 septembre 2008
Statut
Membre
Dernière intervention
30 août 2012
33
21 déc. 2011 à 09:47
21 déc. 2011 à 09:47
si tu veux juste descendre d'une ligne, écris juste :
ActiveCell.Offset(1, 0).Select
gregg1712
Messages postés
45
Date d'inscription
dimanche 20 décembre 2009
Statut
Membre
Dernière intervention
7 juillet 2022
2
21 déc. 2011 à 09:49
21 déc. 2011 à 09:49
Je rentre des donné en a1, b1 et c1 ensuite je reviens en a2
21 déc. 2011 à 09:22
Voici le reste du code pour mieux comprendre mon problème:
https://imageshack.com/
21 déc. 2011 à 09:25
21 déc. 2011 à 09:31
21 déc. 2011 à 09:37
le ActiveCell.Offset(1,-3).Select te décalera d'une ligne en dessous, et de 3 colonnes vers la gauche.
Si tu te trouves en colonne 1, 2 ou 3, tu voudras accéder à la colonne -2, -1 ou 0, ce qui est impossible.
Cordialement.