Bonjour,

Utilisateur expérimenté d'Excel mais débutant en macro et programmation VB, j'ai un pb que je ne sais pas comment résoudre.

J' importe régulièrement dans Excel une liste détaillée de factures à laquelle j'ajoute des formules après l'avoir mise en forme. J'ai commencé à automatiser la mise en forme et l'ajout de formules par une macro. 
Le nombre de colonnes est fixe, mais le nombre de lignes augmente à chaque importation. 
Donc, aujourd'hui je suis obligé de modifier à chaque fois dans ma macro la dernière cellule du tableau dans laquelle recopier les formules et la mise en forme que j'ai créé par la macro sur la première ligne du tableau.
Je voudrais pouvoir entrer comme variable le numéro de la dernière ligne du tableau avec la fonction InputBox, et que la plage de données où je dois coller formule ou mise en forme soit
automatiquement créée dans la macro sans modification manuelle.

Comment faire ?

Merci de votre aide.

MacroXLamateur

Salut
Si tu veux savoir la dernière cellule non plaine tu peux précédé ainsi

Range("a1").Select
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Range("A1").Select

Et le tour est jouer plus  besoin d'un inputbox

[size=4]The J[/size=4] [B)]

Il me semble que l'on peut aussi mettre Dim DerLigne As Long DerLigne = Range("A1").End(xlEnd) @ ++ Mortalino

Petite correction : DerLigne = Range("A1").End(xlDown).Row @++ Mortalino

si tu veut le dernier numero de ligne dans ta feuille tu peut le faire par formule  =nbval(a:a)  ce  qui te premet  également  d'avoir  des formules "qui bougent"  : < indirect(concatener("a1:z";nbval(a:a)) >
ceci rends le tableau variable dans la feuille ( surtout si tu es plus formule que VB)
Salut

Le respect ne se doit pas il se mérite