[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

Τάσος