Aide sur macro excel -ligne suivante et plus.

Fermé
Frédéric - 12 oct. 2005 à 12:48
JP-LR Messages postés 43 Date d'inscription dimanche 17 mars 2013 Statut Membre Dernière intervention 21 décembre 2023 - 21 déc. 2016 à 21:21
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
Didier6464 Messages postés 5 Date d'inscription mercredi 12 juin 2013 Statut Membre Dernière intervention 13 novembre 2013
12 juin 2013 à 18:00
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
0
Didier6464 Messages postés 5 Date d'inscription mercredi 12 juin 2013 Statut Membre Dernière intervention 13 novembre 2013
12 juin 2013 à 18:28
TROUVéééééééééééééééééééééééé !
ActiveSheet.Cells(ActiveCell.Row + 0, ActiveCell.Column + 1).Select
0
ccm81 Messages postés 10851 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 16 avril 2024 2 404
12 juin 2013 à 18:46
Tu as aussi
ActiveCell.Offset(0,1).select

Bonne journée
0
JP-LR Messages postés 43 Date d'inscription dimanche 17 mars 2013 Statut Membre Dernière intervention 21 décembre 2023 1 > ccm81 Messages postés 10851 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 16 avril 2024
14 nov. 2016 à 11:21
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
0
JP-LR Messages postés 43 Date d'inscription dimanche 17 mars 2013 Statut Membre Dernière intervention 21 décembre 2023 1
21 déc. 2016 à 21:21
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é.
0
Anakyn Messages postés 501 Date d'inscription mercredi 25 mai 2005 Statut Membre Dernière intervention 20 juillet 2006 149
12 oct. 2005 à 13:24
0