2013-02-05 19 views
1

我在Excel中編寫了一個計劃,其中包含大量的條件格式,這些條件格式可以提醒我人員是否有重疊的任務。如果有人沒有出現,其他人必須在同一天拍攝幾張照片,那麼我想將其添加到電子表格中以記住這一點。Excel - 如何在VBA中添加複選框並鏈接到旁邊的單元格?

問題是,如果我這樣做,我會得到紅色的細胞提醒我,我不希望通過日期。我想我可能會添加一個名爲「ignoreErrors」的列或類似的東西,並且如果我檢查這些Excel中的任何一個,都會忽略格式化規則的其餘部分。

我發現下面的腳本here(我編輯了一點點):

Sub AddCheckBoxes() 
    On Error Resume Next 
    Dim c As Range, myRange As Range 
    Set myRange = Selection 
    For Each c In myRange.Cells 
     ActiveSheet.checkboxes.Add(c.Left, c.Top, c.Width, c.Height).Select 
     With Selection 
      .LinkedCell = c.Address 
      .Characters.Text = "" 
      .Name = c.Address 
     End With 
     c.Select 
    Next 
    myRange.Select 
End Sub 

當我添加複選框,我得到了一系列的複選框,但在背景中的單元格的值(TRUE或FALSE) 。我不想那樣。我以爲我會將複選框鏈接到旁邊列中的單元格,並隱藏它。 這可能嗎?

回答

3

如果您刪除的行(或評論它)

.LinkedCell = c.Address 

它不會顯示的真或假。

將其鏈接到下一列,請執行下列操作

.LinkedCell = c.Offset(0, 1).Address 

希望這有助於。

+0

謝謝,只是我一直在尋找! – Punchlinern

相關問題