Question

excel VBA 如果录入窗体文本框内容为空则不录入数据

做了一个录入窗体，ComboBox3（即合作商）的内容录入到G列，我想分两种情况，1.如果合作商内容为空（即不填）时，则G列对应单元格不录入任何内容，2.如果合作商内容不为空（即填入数据了），则G列录入填入的数据，我用了如下代码：
If ComboBox3.Value <> " " Then '如果供货商为空则对应，则将供货商单元格不填入任何数据
.Offset(1, 5) = ComboBox3.Value '如果供货商录入了数据，则将供货商单元格填入所录入的数据
End If

出现的问题是：原本G列有公式，我用了这段代码之后，即使合作商不填时，录入数据后G列的公式仍然被覆盖掉了，很头痛，要怎么做才能实现，当合作商数据为空时，G列的公式不被覆盖掉呢？





Answer 1

If Len(ComboBox3.Value)>0 Then '如果供货商为空则对应，则将供货商单元格不填入任何数据
.Offset(1, 5) = ComboBox3.Value '如果供货商录入了数据，则将供货商单元格填入所录入的数据
End If