从组合框到范围(单元格到最后一列)的VBA值

从组合框到范围(单元格到最后一列)的VBA值,vba,combobox,range,Vba,Combobox,Range,我写了一个代码: 'Declare variables Dim LastColumn As Long LastColumn = Cells(1, Columns.Count).End(xlToLeft).Column 'Paste values to sheet Worksheets("Machine Format").Select With Worksheets("Machine Format") Range("C15", .Cel

我写了一个代码:

'Declare variables
Dim LastColumn As Long
LastColumn = Cells(1, Columns.Count).End(xlToLeft).Column

'Paste values to sheet
Worksheets("Machine Format").Select
With Worksheets("Machine Format")
Range("C15", .Cells(15, LastColumn)).Value = UserForm_TFVPM.SealingMethod_ComboBox.Text
End With
它意味着从组合框中获取一个值,并将该值粘贴到一个范围,该范围从C15到最后一列,由第1行判断(直到第1行中确定最后一列的第一个空白单元格)

这段代码的问题是,它将值粘贴到每一列的第15行,甚至A15和B15。我不确定我做错了什么


请有人帮我做这个吗?

检查
LastColumn
的值。可能是1。您应该指定一个工作表。我的工作簿中有多个工作表,它们在这个意义上都是对称的(我需要处理的所有数据都从C列开始)