Excel VBA dupliquer sur dernière cellule vide

Résolu
CedricG62 Messages postés 38 Date d'inscription   Statut Membre Dernière intervention   -  
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Alors voilà, j'ai utilisé l'enregistreur de macro pour créer ça donc ça reste du très basic mais du coup ça ne fonctionne pas comme j'aimerais... 

Sub Suivant_bouton()
'
' Suivant_bouton Macro
'

'
    Range("A4").Select
    Selection.End(xlDown).Select
    Range("M4:P8").Select
    Application.CutCopyMode = False
    Selection.Copy
    Range("A4").Select
    Selection.End(xlDown).Select
    Range("A13").Select
    Selection.End(xlToRight).Select
    Range("M13").Select
    ActiveSheet.Paste
    Selection.End(xlToLeft).Select
    Selection.End(xlToLeft).Select
    Range("O13").Select
    Application.CutCopyMode = False
    Selection.ClearContents
    Range("M14:N15").Select
    Selection.ClearContents
    Range("O16:P16").Select
    Selection.ClearContents
    Range("M17:N17").Select
    Selection.ClearContents
End Sub


Ce que je veux c'est :
- Je viens compléter ma feuille avec des données
- Je clic sur le bouton "Suivant"
- Le petit tableau de M4 à P8 vient se dupliquer au niveau de la dernière ligne vide
- Et pour finir le curseur vient se placer sur la dernière cellule vide en A

Ci-joint mon fichier :
https://www.cjoint.com/c/LEqjPfYR8Mk

Merci de votre aide,

Cédric
A voir également:

14 réponses

Réponse 1 / 14
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonjour,
Ci joint ma proposition en utilisant le petit tableau dans la feuille [Formules] : https://www.cjoint.com/c/LEro71G4Nin
1
CedricG62 Messages postés 38 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,

C'est encore moi ; on m'a demandé d'ajouter un bouton "modifier" qui va permettre d'insérer une ligne dans ma feuille où l'on saisit les valeurs, si on doit ajouter des valeurs manuellement.

Du coup je vais faire réinsérer un nouveau tableau comme on a fait au dessus mais là il faut l'insérer entre 2 lignes existantes.
La macro au dessus insère le "petit tableau" à la dernière ligne vide ; comment dois je modifier le code pour qu'il insère le "nouveau tableau" à la ligne X (qui sera demandé en Msgbox)
Car en faisant insérer une ligne, les formules des autres feuilles se décalent... Faut il juste étirer d'autres formules ou cela va poser un autre problème que je ne vois pas encore ?

Merci de votre aide,

Cédric
0
Réponse 2 / 14
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonjour,
J'ai simplement utiliser une plage nommée via gestionnaire de noms. voir ci dessous:

1
Réponse 3 / 14
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonjour,
Votre lien ne fonctionne pas ou est défectueux car renvoi vers fichier malveillant!
En plus votre code ne fait rien de ce que vous demandez!

0
Réponse 4 / 14
CedricG62 Messages postés 38 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour, je viens d'essayer le lien, il fonctionne très bien...
Y a t il une autre façon pour moi de partager mon fichier ?
0

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

Posez votre question
Réponse 5 / 14
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonjour,
Etrange, maintenant cela fonctionne correctement.
0
Réponse 6 / 14
CedricG62 Messages postés 38 Date d'inscription   Statut Membre Dernière intervention  
 
Bonsoir,
Merci pour l'aide, ça marche nickel ; pour que je comprenne bien, vous avez été rechercher le tableau dans le feuille Formules pour le copier si le test est positif.
Ce que je ne comprends pas c'est comment vous avez définis le "PetitTableau" qui fait 5 Lignes et 4 Colonnes ?
Imaginons que je veuilles agrandir ce tableau ou y apporter des modification ; comment dois je faire pour par exemple copier un tableau qui fasse 2 Lignes et 8 Colonnes ?
0
Réponse 7 / 14
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonjour,
Le poste étant marquer comme résolu, je m'étonne de votre message!
Au cas ou, me mettre le fichier concerné avec sa nouvelle structure !
0
Réponse 8 / 14
CedricG62 Messages postés 38 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,

En effet, vous m'aviez aidé à résoudre le problème précédant mais comme je travail encore sur le fichier, j'ai rencontré une autre problématique du même donc au lieu de récréer un nouveau sujet et de faire +/- des doublons j'écris ici à la suite...
Ci-joint, le fichier : https://www.cjoint.com/c/LEEiqz4aXPk

Je veux ajouter un nouveau tableau "Ajout_tableau" lorsqu'on appuis sur le bouton "Ajouter ligne" donc ça ça fonctionne bien (je me suis basé sur la macro que vous aviez faite)

Mon problème est que je veux ajouter une ligne à ma feuille pour mettre ce tableau mais quand je le fais, toutes les formules, mise en forme... de mon fichier se décalent aussi
Avez vous une idée pour palier à ça ? Est ce juste une astuce dans l'insertion de ligne que je ne connaitrais pas ? (la macro du fichier ne contient pas mon essai de l'insertion de ligne car ça ne fonctionnait pas)

Merci d'avance,

Cédric
0
Réponse 9 / 14
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonjour,
Merci de m'expliquer a quoi doit servir Ajouter une ligne....!
? (la macro du fichier ne contient pas mon essai de l'insertion de ligne car ça ne fonctionnait pas)
Et alors c'est quoi:

--Salutations.
Le Pingou
0
Réponse 10 / 14
CedricG62 Messages postés 38 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,
Sur la feuille "Copier_coller", on vient rentrer des données et imaginons qu'il en manque, il faut pouvoir les rentrer manuellement sans pour autant pouvoir faire n'importe quoi.
Donc le bouton "Ajouter ligne" sert à insérer le tableau qui va permettre d'ajouter une nouvelle donnée.
Le "N° de linge" sert à savoir sur quelle ligne insérer le tableau
En face de ce tableau qui est inséré, il faut que les colonnes A:J soient vides sinon je vais avoir une superposition de données
Le problème est que lorsqu'on faut insérer une nouvelle ligne, toutes les formules se décalent
Peut-être procéder avec déplacement de 1 ligne de toutes les valeurs en dessous du "N° de ligne" saisie ?
0
Réponse 11 / 14
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonjour,
Merci de faire un exemple manuellement et de le colorer les plages en jaune !

--Salutations.
Le Pingou
0
Réponse 12 / 14
CedricG62 Messages postés 38 Date d'inscription   Statut Membre Dernière intervention  
 
Ci-joint le fichier avec les annotations + la couleur jaune, j'espère que ça ira :)

https://www.cjoint.com/c/LEFlK1N7vgk

Merci
0
Réponse 13 / 14
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonjour,
Voici l'ajout de ligne selon demande, merci du retour.
Le Fichier: https://www.cjoint.com/c/LEFqEF6n5Un
Remarque: je ne sais pas ce que vous devez avoir dans la colonne A:A!


0
CedricG62 Messages postés 38 Date d'inscription   Statut Membre Dernière intervention  
 
L'ajout de la ligne fonctionne mais on revient sur le même problème que j'avais moi en essayant :
Les formules se décalent dans l'onglet "IENET" (elles passent de la ligne 9 à 11 si on ajoute une ligne à la ligne 10 par exemple)

Je viens de trouver qu'il faut que j'intègre dans mes formules, les fonctions INDIRECT à chaque fois pour ne pas avoir ce décalage automatique donc il n'y a plus de soucis

Merci à vous pour votre aide,

Cédric
0
Réponse 14 / 14
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonjour,
Eh bien c'est la première fois que vous préciser : Les formules se décalent dans l'onglet "IENET", ceci est normal puisque vos formules (étrange la manière de faire, mais bon, c'est votre choix) sont liés à la structure de la feuille [Copier_coller].
Bonne suite.

0

Discussions similaires

le frigo ne marche pas....
Nemo6456 -
Templier Nocturne -

1 réponse
Excel formule : savoir si une cellule contient partie texte
plunderer007 -
francois -

14 réponses