code ligne suivante

louatt59 · 24 Janvier 2010

Bonsoir , quel est le code en vba qui permet une fois un code with effectué de'aller à la ligne suivante et de ce ranger dans la colonne A

merci d'avance

job75 · 24 Janvier 2010

Re : code ligne suivante

Bonsoir louatt59,

Pas compris. Un bloc With ne fait rien de spécial.

Vous voulez peut-être parler d'une boucle While dans laquelle on incrémente une ligne ?

Le mieux est de fournir votre code.

PS : "se (ou même ce) ranger" ne fait pas partie du vocabulaire Excel...

A+

Gorfael · 24 Janvier 2010

Re : code ligne suivante

Salut louatt59 et le forum
Pas sûr de comprendre, c'est rédigé dans un langage différent du français que j'ai l'habitude de pratiquer.
Ce que je crois comprendre : aller à la cellule A de la ligne suivante
Ce qui donnerait peut-être : cells(activecell.row+1, "A")
Il y a une histoire de With, mais sans autre info, ça ne veut rien dire.
A+

louatt59 · 24 Janvier 2010

Re : code ligne suivante

bonsoir désolé mais suis un peu perdu en vba voila un code que j'utilise

Code:

  With Sheets("Feuil1")
    DerLig = .Range("A" & Rows.Count).End(xlUp).Row: NextLig = DerLig + 1
    .Range("A" & NextLig & ":J" & NextLig).Select
    .Range("A" & NextLig & ":J" & NextLig).Interior.ColorIndex = 3
     .Range("E" & NextLig).Value = TextBox7
   End With

je voudrais que avant le remplissage des données suivante il va à la ligne suivante.
Merci

phlaurent55 · 24 Janvier 2010

Re : code ligne suivante

Bonsoir à tous,

louatt59 à dit:
bonsoir désolé mais suis un peu perdu en vba voila un code que j'utilise

Code:

With Sheets("Feuil1") DerLig = .Range("A" & Rows.Count).End(xlUp).Row: NextLig = DerLig + 1 .Range("A" & NextLig & ":J" & NextLig).Select .Range("A" & NextLig & ":J" & NextLig).Interior.ColorIndex = 3 .Range("[B][SIZE=4][COLOR=red]E[/COLOR][/SIZE][/B]" & NextLig).Value = TextBox7 End With

je voudrais que avant le remplissage des données suivante il va à la ligne suivante.
Merci

à mon avis, c'est le "E" qui pose problème
car ta dernière ligne est calculée dans la colonne A et par conséquent elle ne variera pas en entrant qq chose dans la col E

........ si j'ai bien compris

à+
Philippe
.

louatt59 · 24 Janvier 2010

Re : code ligne suivante

bienvu merci ça fonctionne et que dois je rajouter a ce code si je veux fusionner la ligne?

merci

Code:

 .Range("A" & NextLig).Value = TextBox7

phlaurent55 · 24 Janvier 2010

Re : code ligne suivante

Re,

louatt59 à dit:
bienvu merci ça fonctionne et que dois je rajouter a ce code si je veux fusionner la ligne?

merci

Code:

.Range("A" & NextLig).Value = TextBox7

fusionner la ligne avec quoi ???????????????????????????????

à+
.

louatt59 · 24 Janvier 2010

Re : code ligne suivante

c'est bon j'ai trouvé ceci, amitiés

Code:

Range("A" & NextLig & ":J" & NextLig).Select
     .Range("A" & NextLig & ":J" & NextLig).MergeCells = True

phlaurent55 · 24 Janvier 2010

Re : code ligne suivante

Re,

louatt59 à dit:
c'est bon j'ai trouvé ceci, amitiés

Code:

Range("A" & NextLig & ":J" & NextLig).Select .Range("A" & NextLig & ":J" & NextLig).MergeCells = True

Avoue qu'on aurait pû chercher longtemps

je pensais que tu voulais fusionner la gauche et la droite 😀 😀 😀

louatt59 · 24 Janvier 2010

Re : code ligne suivante

désolé j'etais en meme temps sur des bouquins merci pour tout et par pitié non pas de fusion gauche droite 😡

cordialement

job75 · 24 Janvier 2010

Re : code ligne suivante

Re,

Rien compris à ce fil, mais pour :

louatt59 à dit:
par pitié non pas de fusion gauche droite 😡

c'est bien ce que fait Excel ici (sans faire de politique) :

Code:

.Range("A" & NextLig & ":J" & NextLig).MergeCells = True

Non ?????

A+

phlaurent55 · 24 Janvier 2010

Re : code ligne suivante

Re,

@ job75, pourrais-tu aller faire un petit tour ici
https://www.excel-downloads.com/threads/code-vba.135158/
je pense qu'il faudrait bien un arbitre

à+
Philippe

job75 · 24 Janvier 2010

Re : code ligne suivante

Re Philippe,

phlaurent55 à dit:
je pense qu'il faudrait bien un arbitre

Veni, vidi, mais jeanpierre vincit.

Quand on traite Excel comme ça, faut au moins 10 ans de pratique pour s'en sortir 🙂

A+

code ligne suivante

louatt59

Guest

job75

XLDnaute Barbatruc

Gorfael

XLDnaute Barbatruc

louatt59

Guest

phlaurent55

Nous a quittés en 2020

louatt59

Guest

phlaurent55

Nous a quittés en 2020

louatt59

Guest

phlaurent55

Nous a quittés en 2020

louatt59

Guest

job75

XLDnaute Barbatruc

phlaurent55

Nous a quittés en 2020

job75

XLDnaute Barbatruc

Discussions similaires

code ligne suivante

louatt59

Guest

XLDnaute Barbatruc

XLDnaute Barbatruc

louatt59

Guest

Nous a quittés en 2020

louatt59

Guest

Nous a quittés en 2020

louatt59

Guest

Nous a quittés en 2020

louatt59

Guest

XLDnaute Barbatruc

Nous a quittés en 2020

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency