Problème formules étirés par macro

Résolu
paquito -  
 paquito -

Bonjour,

je rencontre un petit souci avec des formules étirés par macro. 

Si cellule vide la formule est étirée

Si j'ai plusieurs lignes de tableau (tableau commence à A5), pas de souci

Si je n'ai qu'une seule ligne de tableau, c'est la valeur de la cellule qui est étirée et non la formule. 

Si j'ai par exemple 15 comme résultat j'aurai 16, 17, ... 

Si j'ai par exemple mars, j'aurai avril, mai, ... 

Voici la partie de mon code : 

Range("B5").Select
Selection.AutoFill Destination:=Range("B5:B303")

à savoir que j'ai essayé avec : 

Dim LastRow As Long
LastRow = Sheets("Indemnités_km").Cells(Rows.Count, 1).End(xlUp).Row
Range("B5:B" & LastRow).FillDown

mais pas mieux ... 

Les données sont dans un tableau (MEF tableau), ça peut jouer ? Celui-ci va jusqu'à ligne 303 et ne sera pas évolutif ... à priori

Merci
Windows / Office 365

A voir également:

2 réponses

Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 

Bonjour,

Vous avez un tableau de  303 lignes non évolutif, donc vous étirez la formule en $B$5 manuellement  par copier/coller jusqu'ä $B$303 et c'est fini. Pas besoin de macro...!


0
paquito
 

non car c'est une partie du code activé par 1 CommandButton. 

Mais j'ai trouvé d'où vient le problème et finalement ça n'a rien à voir

Merci quand-même

0