excel - Excel セル形式の抽出

Question

レポートの書式設定プロセスを自動化しようとしています。

Excelでセルのフォーマットを抽出する方法にこだわっています。たとえば、表のレイアウト、フォント、色などです。

Excelでセルのフォーマットを抽出しようと考えています。次に、コードをコピーして、書式設定が必要な他の Excel に適用します。より良い解決策があれば教えてください。

Answer 1

あるセルのすべてのフォーマットを別のセルに単純にコピーするには、次のようにします。

Range("A1").Select
Selection.Copy

Range("B1").Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone

---

フォント サイズを取得する例:

Dim fontsize As Integer
fontsize = Worksheets("Sheet1").Cells(1, 1).Font.Size

---

フォント名を取得する例:

Dim fontname As String
fontname = Worksheets("Sheet1").Cells(1, 1).Font.Name

---

同様に、この方法でもフォントの色を取得できます。

セルの塗りつぶしの色を取得するには:

Range("A1").FormatConditions(1).interior.color

---

「Excel vba get cell font name」のように Google で検索すると、多くの例が表示されます。

Answer 2

頻繁に使用するフォーマットの特定の組み合わせがある場合は、スタイルの使用を検討することをお勧めします。スタイルを定義すると、セルの統一フォーマットの作成と維持が非常に簡単になります。