Selection.autofill

Staple1600

XLDnaute Barbatruc

• 16 Juillet 2008

• #2

Re : Selection.autofill

Bonjour



Si j'ai bien compris

Code:

[I] Sub selectB()
Range("B1:B" & [A65536].End(xlUp).Row).Select
End Sub
[/I]

EDITION:

Code:

[B]Sub test_deux()
With [B1]
    .Value = 1
    .AutoFill Destination:=Range("B1:B" & [A65536].End(xlUp).Row)
End With
End Sub
[/B]

Code:

Sub test_trois()
With [B1]
    .FormulaLocal = "=AUJOURDHUI()"
    .AutoFill Destination:=Range("B1:B" & [A65536].End(xlUp).Row)
End With
End Sub

 

Dernière édition: 16 Juillet 2008

Vote positif 0 Vote négatif

S

spitfire378

XLDnaute Occasionnel

• 16 Juillet 2008

• #3

Re : Selection.autofill

Arf c'est pas ca, en faite j'ai une formule en B1 et je voudrais que cette formule s'adapte a la plage comprise entre B1 et B(valeur maximale contenue dans la colonne A), en l'occurence B18, mais ca pourait être 32 a la place de 18 et a ce moment mon selection.autofill irait de B1 a B32


Pas facile a expliquer désolé 😕

 

Dernière édition: 16 Juillet 2008

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 16 Juillet 2008

• #4

Re : Selection.autofill

Bonjour à tous,

Code:

[B]Sub test_quatre()
With [B1]
    .AutoFill Destination:=Range("B1:B" & application.worksheetFunction.max(Range("A:A")))
End With
End Sub
[/B]

 

Vote positif 0 Vote négatif

tototiti2008

XLDnaute Barbatruc

• 16 Juillet 2008

• #5

Re : Selection.autofill

Bonjour Staple1600,

je ne sais pas trop quand spitfire dit :

valeur maximale contenue dans la colonne A

Cliquez pour agrandir...

s'il veux dire la dernière ligne remplie ou vraiment la valeur maximale contenue dans la colonne, alors j'ai proposé une solution avec la valeur maximale.

mais c'est toujours un plaisir de te lire, Staple 😉

 

Vote positif 0 Vote négatif

S

spitfire378

XLDnaute Occasionnel

• 17 Juillet 2008

• #6

Re : Selection.autofill

Vraiment désolé d'avoir été peu clair, en fin de compte c'est la version de tototiti2008 qui correspond a ce dont j'ai besoin. Merci a vous

 

Vote positif 0 Vote négatif