Formule d'incrémentation d'une ligne en vba
Fermé
Bouzy
-
24 oct. 2011 à 18:39
Le Pingou Messages postés 11538 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 24 mars 2023 - 24 oct. 2011 à 22:18
Le Pingou Messages postés 11538 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 24 mars 2023 - 24 oct. 2011 à 22:18
A voir également:
- Formule d'incrémentation d'une ligne en vba
- Formule excel - Guide
- Erreur 1004 vba ✓ - Forum VB / VBA
- Formule de politesse mail anglais - Guide
- Le fichier contient le nombre de voyageurs dans 3 gares. dans la cellule b5, saisissez une formule qui calcule le total et se met à jour si on change une valeur du tableau. quel total obtenez-vous ? quelle formule avez-vous saisie ? ✓ - Forum Excel
- Excel copier formule sans incrémentation ✓ - Forum Bureautique
3 réponses
ccm81
Messages postés
10559
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
24 mars 2023
2 337
24 oct. 2011 à 19:08
24 oct. 2011 à 19:08
bonsoir
ou bien la première ligne non vide de la colonne A
Sheets(nomFeuille).Range("A" & Rows.Count).End(xlUp).Row + 1
bonne suite
ou bien la première ligne non vide de la colonne A
Sheets(nomFeuille).Range("A" & Rows.Count).End(xlUp).Row + 1
bonne suite
Vaucluse
Messages postés
26495
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
8 avril 2022
6 319
24 oct. 2011 à 18:55
24 oct. 2011 à 18:55
Bonsoir
en attendant mieux, trouver la première cellule vide dans un champ (ici E50:E5000)
Dim cellulevide As String
On Error Resume Next
Set celluletrouvé = [E10:E5000].Find(What:=cellulevide)
celluletrouvé.Select
crdlmnt
en attendant mieux, trouver la première cellule vide dans un champ (ici E50:E5000)
Dim cellulevide As String
On Error Resume Next
Set celluletrouvé = [E10:E5000].Find(What:=cellulevide)
celluletrouvé.Select
crdlmnt
Le Pingou
Messages postés
11538
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
24 mars 2023
1 334
24 oct. 2011 à 22:18
24 oct. 2011 à 22:18
Bonjour tous,
Autre possibilité pour trouver la première cellule vide d'une ligne ou d'une colonne, résultats en H13 et I13
Autre possibilité pour trouver la première cellule vide d'une ligne ou d'une colonne, résultats en H13 et I13
Sub NumeroLiVideCoVide()
'première colonne vide à droite
range("H13") = Cells(3, Rows(3).Cells.Count).End(xlToLeft).Column + 1
'Idem pour la première ligne vide par exemple la colonne [A] et [B]
Range("I13") = Cells(Columns(1).Cells.Count, 1).End(xlUp).Row + 1
Range("J13") = Cells(Columns(2).Cells.Count, ["b"]).End(xlUp).Row + 1
End Sub