Ms Excel - VBAコード/マクロを自動入力する列

Question

特定のテキストで列を埋めるためにExcelでVBAコードを教えてもらえますか？ 列には1000個の行があり、200または300行ごとにテキストが変更されます。テキストをすべての行に複製し、テキストが変更されたときに次のテキストを複製する必要があります。

ありがとうございます。

Answer 1

あなたはこれを試すことが...

は全体の列Aは、Ctrl + Gを選択して、特別にクリック - >ブランクを選択 - > [OK]をクリックします - > [キーボードのタイプから=最大押しますCtrlキーを押しながらEnterキーを押し（Enterキーを押しながら）、列Aをコピーして値として戻します。

それとも、単にあなたがautofilする複数の列を持っている場合は、あなたが（「A2：」範囲を置き換えることができ

Sub Autofill() 
Dim lr As Long 
lr = ActiveSheet.UsedRange.Rows.Count 
On Error Resume Next 
Range("A2:A" & lr).SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=R[-1]C" 
Range("A2:A" & lr).Value = Range("A2:A" & lr).Value 
End Sub 

...上に書いたすべての手順を実行しますどの次のマクロを実行することができます&をlr）をRange（ "A2：Z" & lr）のような実際の範囲で置き換えます。ここで、Zは例としてシート上で最後に使用される列です。