Excel - 黄色でハイライト表示されたセルすべてにマクロを割り当て

問題

こんにちは、私は現在ピクルスに入っています...私はすべてのマスターがこのVBA noobに手を貸すことができると思います...

現時点では、アクティブセルの値を保持せずにすべての数式をコピーするマクロを作成しました。このマクロを、スプレッドシート内の黄色で強調表示されている黄色のセルすべてに適用したいと思います。

私の現在のコードは

(私はまだこのマクロを含むように黄色のハイライトされたセルだけを作るために何を置くべきか考えることができません)

 Sub Copy_Formulas_Only()単一行としての行を暗くする= ActiveCell.row Selection.EntireRow.Insert Rows(行 - 1)。エラー時に選択次の選択を再開します。貼り付け特殊貼り付け:= xlPasteFormulas Selection.SpecialCells(xlCellTypeConstants)。エラー発生時にClearContentsを実行する0 Application.CutCopyMode = False End Sub 

溶液

セル範囲を選択したときにトリガーされます。 しかし、私はあなたがあなたがする必要があることをもっとよく知っていると思います。

 Private Sub Worksheet_SelectionChange(ByValターゲットを範囲として)Application.EnableEvents = False 'Target.Address = "すべての黄色のセル内のワークシートの場合"(CELL.Interior.Color = 65535)の場合それからDim row As Single Row = ActiveCell.row Selection.EntireRow.Insert Rows(row - 1).Copy Rows(row)。エラー時に選択次へSelection.PasteSpecialペースト:= xlPasteFormulas Selection.SpecialCells(xlCellTypeConstants).ClearContents Application.EnableEvents = Trueエラーの場合GoTo 0次のApplication.CutCopyModeがFalseの場合は終了End Sub 

注意

フォーラムでこのヒントを寄せてくれたrizvisa1に感謝します。

前の記事 次の記事

トップのヒント