Insérer une Ligne avec macro au dessus d'une ligne de total

Fermé

Christopher LEROY - 4 août 2016 à 22:16
titoff5969 Messages postés 3 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 5 août 2016 - 5 août 2016 à 21:51

Bonjour à tous,

Je me permet de poster une question concernant un fichier excel.

Je souhaiterais insérer une ligne via une macro au dessus d'une ligne de total que j'ai en bas de mon tableur.
A l'heure actuelle il me copie la ligne sur la ligne 74 :'(
Ci dessous mon code

Sub InsererLigne()
'
' InsererLigne Macro
'
' Touche de raccourci du clavier: Ctrl+i
'
Rows("74:74").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
End Sub

Je vous remercie d'avance pour l'aide apportée

A voir également:

Insérer une Ligne avec macro au dessus d'une ligne de total
Site de vente en ligne particulier - Guide
Hors ligne instagram - Guide
Aller à la ligne excel - Guide
Partage de photos en ligne - Guide
En ligne sur messenger alors que non ✓ - Forum Facebook

6 réponses

Réponse 1 / 6

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
4 août 2016 à 22:31

Bonjour,

essaies avec ceci :

Sub InsererLigne()
'
' InsererLigne Macro
'
' Touche de raccourci du clavier: Ctrl+i
'
Rows(Rows(Rows.Count).End(xlUp).Row).Insert
End Sub

Réponse 2 / 6

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
Modifié par gbinforme le 5/08/2016 à 09:15

Bonjour,

Il faudrait savoir ce que tu veux précisément , d'autant plus que tu change aussi de nom :

Je souhaiterais insérer une ligne via une macro au dessus d'une ligne de total que j'ai en bas de mon tableur.
ou
Je souhaite ajouter une ligne au dessus de la ligne Ref, Description...
et là, ta ligne est en double : l'on prend laquelle ?
Alors, en prenant la dernière tu fais ceci :

Sub InsererLigne()
'
' InsererLigne Macro
'
' Touche de raccourci du clavier: Ctrl+i
'
Rows(Rows(Rows.Count).End(xlUp).Row-1).Insert
End Sub

Toujours zen
La perfection est atteinte, non pas lorsqu'il n'y a plus rien à ajouter, mais lorsqu'il n'y a plus rien à retirer. Antoine de Saint-Exupéry

Réponse 3 / 6

titoff5969 Messages postés 3 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 5 août 2016
4 août 2016 à 23:24

Je vous Remercie pour la réponse rapide.
Malheureusement le code ne me permet pas de réaliser ce que je souhaite faire (Ou je l'ai mal utilisé)
Je souhaite ajouter une ligne au dessus de la ligne Ref, Description... et que ce soit ajouter toujours avant cette ligne.
Ci dessous un imprim ecran pour plus de clarté.
je vous remercie encore

Réponse 4 / 6

titoff5969 Messages postés 3 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 5 août 2016
5 août 2016 à 19:47

Je me suis juste inscrit :D

Je souhaite creer une macro qui insére une ligne au dessus de ce qu'il y a dans la ligne numéro 22.
A chaque ajout de ligne la ligne doit évoluer car je veux que ca reste en dernière position et avant la ligne avec les références, description...

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question

Réponse 5 / 6

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
5 août 2016 à 21:23

Bonjour,

Je me suis juste inscrit :D
et moi j'avais zappé la parenthèse finale :) :) :)
Bienvenue sur le forum.

As-tu testé ma dernière proposition ?
C'est ce qui devrait être effectué même si le code est succinct.

Réponse 6 / 6

titoff5969 Messages postés 3 Date d'inscription jeudi 4 août 2016 Statut Membre Dernière intervention 5 août 2016
5 août 2016 à 21:51

oO purée ca fonctionne

MERCI Beaucoup

Discussions similaires

Que veut dire "correspondant occupé" lors d'un appel ?

Statut « en ligne » alors que non

Total AdBlock

Ligne occupée : pourquoi mon téléphone sonne occupé ?

Site fiable ou arnaque ?

Discussions similaires

Newsletters