Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

incrémentation

H

hokuto

Guest
j aimerais avoir une incrémentation automatik sur excel

en gros des que je tape sur entrée excel numérote 1, 2 ,3...

est ce possible?
 

Staple1600

XLDnaute Barbatruc
en A1 saisir 1
en A2 saisir 2

sélectionner les deux cellules
puis recopie vers le bas

Avec l'enregistreur de macro:
(pour aller de 1 à 100)
Sub Macro1()
Application.ScreenUpdating = False
'ligne ci-dessus rajoutée
Range('A1').Select
ActiveCell.FormulaR1C1 = '1'
Range('A2').Select
ActiveCell.FormulaR1C1 = '2'
Range('A1:A2').Select
Selection.AutoFill Destination:=Range('A1:A100'), Type:=xlFillDefault
End Sub
 

_Thierry

XLDnaute Barbatruc
Repose en paix
Bonjour Hokuto, Staple, le Forum

Une autre approche par boucle VBA toute simple :



Par contre tu pourras affecter cette macro à une Touche Clavier quelconque (Menu Outil Macro puis Option) mais pas sur la touche [Enter]... Sinon il faudriat voir avec OnKey, mais c'est déconseillé... On peut aussi attribuer ce code à une Macro évènementielle (Click Droit etc)

Bon App
@+Thierry
 

Discussions similaires

Réponses
6
Affichages
691
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…