Ajout de case automatique dans une feuille

J

Jean-Alexis

Guest
Bonjour. Voici ce que je voudrais faire si quelqu'un avait une idée je lui serais très reconnaissant:
J'ai créé un onglet dans excel dans lequel je vais devoir rentrer des
données. Cela va ressembler en gros à

---
Nom : Prénom : Age :
Date :
Divers :
---

mais avec pas mal d'autres cases à remplir.
C'est pourquoi j'aimerais avoir la possibilité de cliquer sur un bouton intitulé "Nouvelle fiche"
qui rajouterait automatiquement une "nouvelle fiche" au dessous de la précédente,
identique mais non remplie ce qui me permettrait d'aller plus vite.
Je voudrais à tout prix éviter le copier/coller. En gros en cliquant sur un bouton j'aimerais obtenir ça : (près à remplir).

---
Nom : DUPONT Prénom : Tintin Age : 72
Date : 26/11/2003
Divers : -
---

Nom : Prénom : Age :
Date : 30/07/2004
Divers :
---

(si la date pouvait apparaitre automatiquement cela serait génial)

Avez-vous une solution ? Merci beaucoup.
Jean-Alexis.
 
C

chris

Guest
Bonjour
Ce n'est peut être pas une bonne idée d'utiliser 3 lignes par personne car si plus tard tu veux faire des filtres ou autres opérations, cela ne va pas marcher.
Il serait mieux de mettre une info par colonne et d'utiliser la grille de saisie (menu données, grille).
Chris
 
J

jean-alexis

Guest
ok pour les filtres merci. pour créer la macro je sais faire, je fais ENREGISTRER UNE MACRO , le racourci clavier aussi. Mais comment attribuer la macro a un bouton ? En plus je suis pas sûr que le copier/coller se fasse en bas de la liste. Ne va-t'il pas se faire au milieu ? En tout cas merci. Continuez si vous avez d'autres avis.
MErci.
 
T

tracor

Guest
salut jean alexis

pour attribuer la macro à un bouton
tu dessines une forme automatique
tu fais un clik droit et tu choisis affecter une macro
tu cliques sur la macro que tu veux attribuer et
le tour est joué
par contre tu as raison
le copier coller se fera ou tu as coller ton premier tableau
je ne sais pas comment palier ce problème
mais la réponse devrait venir avec les pros en vba présent sur ce phorum


tracor
 
J

jean-alexis

Guest
Bon j'ai regardé VBA, j'ai compris comment créer une macro, comment ça fonctionne en gros mais je ne serais pas capable de taper le code pour qu'il me copie une nouvelle zone identique en dessous de toutes les autres...
 
E

Emmanuel

Guest
Salut jean-alexis bonjour le forum

essaye ceci
en supposon que a1=nom, b1=prénom et a2= adresse

public Sub copy()

Dim L As Integer

L = Sheets("feuil1").Range("a65536").End(xlUp).Row + 1

Range("A1:B2").Copy Range("A" & L)

Application.CutCopyMode = False

End Sub
à affecter à un bouton

Abientôt
Emmanuel
 

Discussions similaires

Statistiques des forums

Discussions
312 332
Messages
2 087 365
Membres
103 528
dernier inscrit
maro