So the information should go to "Folha 10" and it doesn't go.

no errors, only that problem.

Data doesn't go anywhere.


If I put this away
Dim rcnt50 As Long
    
    rcnt50 = Folha10.Cells(1, Columns.Count).End(xlToLeft).Column
    
    For i = 2 To rcnt50
    
    If Folha10.Cells(1, i) = Extrusão.ComboBox3.Value Then
    Folha10.Cells(1, 1 + k) = ""
    End If
    Next
    End If
it wrights in "folha10" but it can repeat the .values from the extrusão.combobox3 and I don't want that to happen!


you can test things by using the "colaborador".

in the first combobox that appears to you, choose "Fino". Then you can choose whatever you want...


Thanks!