返回列表 上一主題 發帖

[發問] commandbutton隨儲存格移動

[發問] commandbutton隨儲存格移動

請位各位大大~
如何將commandbutton隨著儲存格移動呢??
按鈕放置於A3:A4,在第二列按下插入,按鈕會自動往下移至A4:A5
寶寶

回復 1# caichen3


   

TOP

回復 2# GBKEE


    但將按鈕屬性設成"大小位置隨儲格存而變"為什麼按鈕依然不動呢??
寶寶

TOP

回復 3# caichen3

1.gif

TOP

回復 3# caichen3
  1. Private Sub CommandButton1_Click()
  2. Dim x As Integer
  3. Dim k As Integer
  4. Dim xxx As String
  5. x = UserForm1.ComboBox1.Value
  6. k = Range("H1").Value
  7. If x > k Then
  8.    x = x - k
  9.    For i = 1 To x
  10.        '***Range("A3:G3").Insert
  11.        Range("A3").EntireRow.Insert
  12.    Next
  13. ElseIf x < k Then
  14.    x = k - x
  15.    For i = 1 To x
  16.        '**Range("A3:G3").Delete
  17.        Range("A3").EntireRow.Delete
  18.    Next
  19. End If
複製代碼

TOP

        靜思自在 : 並非有錢魷是快樂,問心無愧心最安。
返回列表 上一主題