[VBA] Καθυστέρηση της φόρμας

[anestaki]

Καλησπέρα και καλή χρόνια
Η μέθοδος ComboBox2.List() = Worksheets("Κατηγ. Δαπανών").Range("c:c").Value μου καθυστερεί την εμφάνιση της φόρμας.
Και ειδικά για πολλές λίστες παράδειγμα:
ComboBox2.List() = Worksheets("Κατηγ. Δαπανών").Range("c:c").Value
ComboBox3.List() = Worksheets("Κατηγ. Δαπανών").Range("c:c").Value
ComboBox4.List() = Worksheets("Κατηγ. Δαπανών").Range("c:c").Value
Όποια Βοήθεια δεκτή, σας ευχαριστώ εκ’ των πρότερων Γιώργος.

[Tasos]

Καλησπέρα!

Γιώργο δοκίμασε:

    With Sheet1 ' Sheet1 = το κωδικό όνομα του φύλλου όπως φαίνεται στον VBE. Παράδειγμα: Sheet1 (Κατηγ. Δαπανών). _
                 Είναι πιο σίγουρο να χρησιμοποιείται το κωδικό όνομα του φύλλου από το όνομα _
                 που εμφανίζεται στην καρτέλα του φύλλου το (οποίο το δεύτερο) αν μετονομασθεί _
                 θα προκαλέσει προβήματα στον κώδικα.
                
        ComboBox2.List = Range(.Cells(1, 3), .Cells(Rows.Count, 3).End(xlUp)).Value
        ComboBox3.List = ComboBox2.List
        ComboBox4.List = ComboBox2.List
    End With

Τάσος

[anestaki]

Σε ευχαριστώ και πάλι για την άμεση βοήθεια