Autofill σε μακροεντολή
 

καλησπέρα σε όλους,

Θα ήθελα την βοήθεια σας
Sheet1
Στήλη Α : κωδικοί
Στήλη Β : ποσά
Sheet2 :
Στήλη Α : κωδικοί απο Α2 έως Α100
Στήλη Β : αθροισμα ποσών με συναρτηση sumif στο κελι Β2 διαβάζει αθροίσματα απο το sheet1
ολα αυτά καταγράφονται σε μακροεντολή μετο Record macro

θα ήθελα την βοηθεια σας στο εξής θέμα
ξεκινώ να κατάγράφω νέα μακροεντλή πηγαίνω στο κελι β2 στην γωνία κάτω δεξιά ώστε να κανει autofill την στήλη b με την συνάρτηση που ειναι στο κελί β2 μέχρι και την γραμμή εκατό μόλις το κάνω πατάω στοπ μακρο.
την επόμενη φορά ομως που οι κωδικοί έιναι εκατόν 110 και τρέχω την συγκεκριμενη μακρο μου φερνει την συναρτηση sumif μέχρι και την 100 γραμμή και δεν κανει autofil και στις 110 γραμμές όσοι ειναι κια οι κωδικοί.

Sub Macro2()
'
' Macro2 Macro
'

'
Range("B2").Select
Selection.AutoFill Destination:=Range("B2:B100")
Range("B2:B100").Select
End Sub


Κάποιος που μπορει να με βοηθήσει; :001:

Καλημέρα

Βασίλη δοκίμασε τον παρακάτω κώδικα:

Φιλικά/Γιώργος

Ευχαριστώ πολύ για την πολύ σημαντική βοήθεια :)