返回列表 上一主題 發帖

一個表單問題

回復 6# hong912
試試看
  1. Private Sub UserForm_Initialize()
  2.     ComboBox1.List = 工作表2.UsedRange.Columns(1).Value
  3. End Sub

  4. Private Sub CommandButton1_Click()
  5.     Range("C:C").Find("*", , , , , xlPrevious).Offset(, 10) = Me.ComboBox1
  6.     Unload Me
  7. End Sub
複製代碼
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

回復 5# 周大偉
類似這樣的嗎?

Ex.rar (22.77 KB)
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

回復 11# 317

試試看


    Ex.rar (34.75 KB)
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

        靜思自在 : 手心向下是助人,手心向上是求人;助人快樂,求人痛苦。
返回列表 上一主題