Incrémenter une variable dans une boucle

phlaurent55

Nous a quittés en 2020

Repose en paix

• 28 Août 2012

• #2

Re : Incrémenter une variable dans une boucle

Bonjour wapadou,

pourrais-tu vérifier si txt_Resultat contient quelque chose ?

i = i + 1 n'est pas nécessaire dans la boucle

......... mais sans voir le fichier ?????????

à+
Philippe

 

Vote positif 0 Vote négatif

jmps

Nous a quitté

Repose en paix

• 28 Août 2012

• #3

Re : Incrémenter une variable dans une boucle

phlaurent55 à dit:

i = i + 1 n'est pas nécessaire dans la boucle
à+
Philippe

Cliquez pour agrandir...

Bonjour,

C'est surtout que i = i + 1 dans une boucle For i... ça m'interpelle 😎

 

Vote positif 0 Vote négatif

W

wapadou

XLDnaute Nouveau

• 28 Août 2012

• #4

Re : Incrémenter une variable dans une boucle

voici le fichier

Merci

 

Pièces jointes

• Désignation bdl_ettiquettes_v2.xls

  774 KB · Affichages: 62

Vote positif 0 Vote négatif

phlaurent55

Nous a quittés en 2020

Repose en paix

• 28 Août 2012

• #5

Re : Incrémenter une variable dans une boucle

Re,

@ JMPs:

encore plus interpellé quand je vois ceci: =INDIRECT("données!e"&ENT(LIGNE()/4+3);1)
"Données" étant le nom d'un usf

et ceci: =INDIRECT("Feuil1!a"&ENT(LIGNE()/3)+2;1)
alors qu'il n'y a pas de feuille1 dans le classeur

je m'avoue vaincu 🙁

à+
Philippe

Edit: et je cherche toujours: Me.txt_Resultat

 

Dernière édition: 28 Août 2012

Vote positif 0 Vote négatif

jmps

Nous a quitté

Repose en paix

• 28 Août 2012

• #6

Re : Incrémenter une variable dans une boucle

Bin comme y'avait pas de mode d'emploi du userform j'ai pas cherché plus loin...

 

Vote positif 0 Vote négatif

D

dudule

Guest

• 28 Août 2012

• #7

Re : Incrémenter une variable dans une boucle

Bonjour,

Je ne comprend pas pourquoi faire une boucle alors que tu peux directement récupérer la dernière cellule non vide d'une colonne (et donc la première vide).
Sinon je n'ai pas essayé de comprendre ton Userform mais je pense que ça part un peu dans tous les sens mais si tu arrives à t'y retrouver alors ok !

Code:

Private Sub CommandButton3_Click()

ActiveWorkbook.Sheets("Feuil2").Activate

Dim DernLigne As Long
DernLigne = Range("D" & Rows.Count).End(xlUp).Row 'on cherche la dernière cellule non vide
DernLigne=DernLigne+1 'DernLigne+1 est donc la première celulle vide

Range("D" & DernLigne) = txt_Resultat

End Sub

Code à mettre dans l'userform Emplacement à la plage de la sub

Code:

Private Sub CommandButton3_Click

actuelle.

Bon courage !

A+🙂

 

Dernière modification par un modérateur: 28 Août 2012

Vote positif 0 Vote négatif

W

wapadou

XLDnaute Nouveau

• 28 Août 2012

• #8

Re : Incrémenter une variable dans une boucle

oui désolé pour le fouilli, en me relisant j'ai remarqué ce bazar
Je suis jeune papa et ces ma deuxièmes journées de boulot et j'ai pas trop les yeux en face des trous aujourd'hui.

Je vais voir ça demain matin et je vous tiens au jus.

En tout cas merci pour l'aide

 

Vote positif 0 Vote négatif