Transferer une ligne de donnees.
Résolu
YOUPI!OUAI!
Messages postés
92
Statut
Membre
-
YOUPI!OUAI! Messages postés 92 Statut Membre -
YOUPI!OUAI! Messages postés 92 Statut Membre -
Voilà l'idée:
Après avoir entré des données sur une ligne A de la feuille1 les transférer dans une feuille2 en les validant.
Puis faire en sorte que que ces données soit enregistrées sous un numéro(disons 1).
Et enfin de pouvoir à nouveau entrer des données sur la ligne A de la feuille 1 qui après validation seraient enregistrées en feuille deux sous le numero deux...
Et ainsi de suite.
Merci pour votre aide
Après avoir entré des données sur une ligne A de la feuille1 les transférer dans une feuille2 en les validant.
Puis faire en sorte que que ces données soit enregistrées sous un numéro(disons 1).
Et enfin de pouvoir à nouveau entrer des données sur la ligne A de la feuille 1 qui après validation seraient enregistrées en feuille deux sous le numero deux...
Et ainsi de suite.
Merci pour votre aide
2 réponses
-
-
Je vient de désactiver la macros et peut lire la démarche que vous avez mené.
Vraiment un grand, un gros, Merci-
Rebonjour,
Je suis très satisfait de la solution qui m'a été apportée. Toutefois j'ai omis de préciser que la ligne A de la feuille1 est renseignée pas un collé avec liaison. Conséquence, la feuille2 ne valide pas les données de la ligne AFeuille1
Quelqu'un à une solution?- Essaie comme cela
Private Sub Transferer_Click()
Dim DerCel As Range
Worksheets("Feuil1").Range("A2:J2").Copy
With Worksheets("Feuil2")
Set DerCel = .Range("A" & Rows.Count).End(xlUp)
DerCel.Offset(1) = Val(DerCel) + 1
.Range("B" & DerCel.Row + 1).Resize(1, 10).PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
End With
End Sub
A+ - Je suis impressionné.
Ca fonctionne parfaitement!
'faut vraiment que je me mette à l'anglais et à l'écriture VBA.
Quelques mots biens choisis et biens ordonnés et voilà que la magie s'exprime.
Encore grand Merci Gyrus.
Attendez-vous que je revienne à vous. Parce que grâce à vous mon projet informatique prend une dimension que je n'envisageait pas.
-
