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

XL 2016 Autofill avec possibilité de ligne unique

vinceda

XLDnaute Junior
Bonjour à tous,

comme certains sur ce forum, je me heurte à un souci avec une copie de formule jusqu'à la dernière ligne lorsque mon fichier ne contient qu'une ligne....ce fichier peut contenir un grans nombre de ligne comme une seule et là c'est le drame !!!
Ma formule est celle ci-dessous (rechercheV...) et je souhaite la copier jusqu'à la dernière ligne....(qui peu-être une ligne unique....)

With Range("K2")
.FormulaR1C1 = "=IF(ISNA(VLOOKUP(RC[-9]1,Feuil2!R1C1:R10000C13,6,FALSE)),""0"",(VLOOKUP(RC[-9]1,Feuil2!R1C1:R10000C13,6,FALSE)))"

' copieformule Macro
.AutoFill Destination:=Range("K2:k" & Range("A65536").End(xlUp).Row)

Pouvez-vous m'aider dans la résolution de cette sitaution très bloquante pour moi?

merci d'avance
 

vinceda

XLDnaute Junior
Bonjour Dranreb,
Merci beaucoup pour cette réponse si rapide...
A l'origine, j'avais pensé à cette solution mais ensuite , je selectionne mon tableau pour l'imprimer et avec l'affectation de la formule sur l'ensemble de la colonne, je me retrouve avec une selection qui ne correspond pas aux nombre de lignes effectivement remplie.
 

Dranreb

XLDnaute Barbatruc
C'est bien pour ça que le n'ai pas dit toute la colonne mais tout la colonne UTILE. Donc jusqu'à la dernière ligne seulement.
Range("K2:K" & Range("A65536").End(xlUp).Row).FormulaR1C1 = etc.
 

Discussions similaires

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