Aide sur macro excel -ligne suivante et plus.

[Fermé]
Signaler
-
Messages postés
42
Date d'inscription
dimanche 17 mars 2013
Statut
Membre
Dernière intervention
22 mars 2019
-
BOnjour à tous , je découvre ce forum et ca m'a l'air pas mal du tout!!
Est ce que quelqu'un pourrait m'aider à créer une macro (en fait le point bloquant pour moi et le "cellule ou ligne suivante).
je m'explique,j'ai un fichier excel avec 5 onglets que je mets à jour quotidiennement en ajoutant une ligne avec (date) et des informations et une cellule total (qui somme tous les chiffres)
j'ai un onglet qui recapitule la date et le total pour les 4 onglets.
je souhaiterais (apres la mise à jour) des 4 onglets que le recap se mette à jour tout seul avec un bouton.. j'ai essayé en mode création mais je ne me souviens plus (je l'ai su il y a fort longtemps) comment on automatise le "cellule suivante vers le bas" range quelquechose.. est ce que quelqu'un peut m'aider
Merci d'avance
A voir également:

2 réponses

Bonjour,

Il y a plusieurs méthodes pour répondre à ton problème, je crois que la formule la plus simple est la suivante :

ActiveSheet.Cells(ActiveCell.Row + 1, ActiveCell.Column).Select

Bien sur il faut remplacer ActiveSheet par Sheet("Nom de la feuille") si le déplacement n'est pas demandé sur la feuille en cours.

Cordialement

Sergio
2
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 42674 internautes nous ont dit merci ce mois-ci

Messages postés
5
Date d'inscription
mercredi 12 juin 2013
Statut
Membre
Dernière intervention
13 novembre 2013

Pardon Sergio
Je cherche sans trouver comment passer à la cellule suivante de la colonne suivante au lieu de la ligne suivante. j'ai bidouiller ta formule sans succès.
ActiveSheet.Cells(ActiveCell.Column + 1, ActiveCell.Column).Select ou
ActiveSheet.Cells(ActiveCell.Column + 1, ActiveCell.Row).Select mais marche pas comme je veux....
Merci
Didier
Messages postés
5
Date d'inscription
mercredi 12 juin 2013
Statut
Membre
Dernière intervention
13 novembre 2013

TROUVéééééééééééééééééééééééé !
ActiveSheet.Cells(ActiveCell.Row + 0, ActiveCell.Column + 1).Select
Messages postés
10118
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
18 septembre 2021
2 204
Tu as aussi
ActiveCell.Offset(0,1).select

Bonne journée
Messages postés
42
Date d'inscription
dimanche 17 mars 2013
Statut
Membre
Dernière intervention
22 mars 2019
1 >
Messages postés
10118
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
18 septembre 2021

Bonjour,
Quelqu'un connait-il une solution pour que ce décalage de lignes - offset(1,0) - respecte un filtre de la feuille de calcul (ouf, question difficile à expliquer; j'espère que vous allez me comprendre ?)
Merci d'avance,
Jean-Paul
Messages postés
42
Date d'inscription
dimanche 17 mars 2013
Statut
Membre
Dernière intervention
22 mars 2019
1
N'ayant pas eu de réponse à ma question ci-dessus (LOL), j'ai trouvé cette solution :
inclure dans la boucle, un test de la propriété "cachée / Hidden" de la ligne.
=> If ActiveCell.EntireRow.Hidden = False Then ....
Avec ça je me suis débrouillé.
Messages postés
501
Date d'inscription
mercredi 25 mai 2005
Statut
Membre
Dernière intervention
20 juillet 2006
150