EXCEL VBAのプログラミングについて教えてください。
セルA1とセルB1が結合されており、セルには「あいうえお」と入力されています。
入力された「あいうえお」の内、「いうえ」は赤文字+太字を設定したと仮定します。
その結合されたセルの文章と文字色+太字を、結合されていないA3というセルに複写する場合、
下記の様なコードを考えてみましたが、長文になると処理が遅いので知恵を貸してください。
Range("A3").Value = Range("A1").Text
For i = 1 To Len(Range("A1").Text)
Range("A3").Characters(i, 1).Font.Color = Range("A1").Characters(i, 1).Font.Color
Range("A3").Characters(i, 1).Font.Bold = Range("A1").Characters(i, 1).Font.Bold
Next i
よろしくお願いします。
No.3
- 回答日時:
結合されたセルの値やその属性は一番左上のセルの値として保存されていたと思います。
なので
Range("A1").Copy Range("A3")
でいいのでは?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excleマクロ セル値の代入と文字列の結合について 3 2022/10/05 16:47
- Visual Basic(VBA) エクセルVBA ダブルクリックしたら色反転を指定したセルのみにしたい 2 2022/04/06 12:52
- Excel(エクセル) 並べ替え、ソートの構文がわからない。 お世話になります。VBA超初心者です。 エクセルでワークシート 2 2023/06/28 21:00
- Excel(エクセル) 【マクロ】ボタンを押すごとに、A1セル、A2セル、A3セルに日付を入力 3 2023/01/25 00:12
- Visual Basic(VBA) データのある範囲を選択するVBAについて 2 2022/09/03 00:20
- Visual Basic(VBA) Excel VBA メール作成について 本文の中にExcel でコピーした図を上下に2つ 貼り付けを 2 2023/06/14 01:48
- Excel(エクセル) エクセルVBAでセルに表示されているとおりの数値を取得したい(時間の計算結果) 1 2022/03/30 17:52
- Excel(エクセル) VBAで組み合わせ算出やCOUNTIFSの処理を高速化したいです。 4 2022/04/07 02:38
- Visual Basic(VBA) access count数を変数に格納 2 2022/03/30 19:21
- Excel(エクセル) 条件付き書式でフォント色を赤に設定しましたが、 2 2023/07/29 14:17
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
エクセルの表示形式を保ったまま、セルに値を代入するには?
Visual Basic(VBA)
-
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
Excel2000/VBA:値と書式のみ貼り付けたい。
Excel(エクセル)
-
-
4
Excel 関数を使ってデータと一緒にその書式もコピーしたいのですが・・・
Excel(エクセル)
-
5
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
6
エクセルへのデータの貼付時に書式が反映されない!
Visual Basic(VBA)
-
7
Excel VBA : 文字列の属性も含めて結合する方法
Excel(エクセル)
-
8
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
9
VBA 数値を文字列として貼付したい
Excel(エクセル)
-
10
Excel VBA セル内に設定されたテキストを書式ごとコピー(複数セル)
Excel(エクセル)
-
11
Rangeメソッドは失敗しました。globalオブジェクトについて
Excel(エクセル)
-
12
Excelでセル参照したとき、書式も一緒に持ってくるには?
Windows Vista・XP
-
13
VBA 書式設定を保持したままセル内の文字を追記
Excel(エクセル)
-
14
DATE型変数を初期化する方法
Visual Basic(VBA)
-
15
VBAでシート書式の自動変換を作動させない方法
Excel(エクセル)
-
16
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
17
VBAで転記すると元のシートの条件付き書式が消えてしまいます。
Excel(エクセル)
-
18
Application.ScreenUpdating = Falseが効きません
Visual Basic(VBA)
-
19
該当するデータを書式設定ごと転記したい
その他(Microsoft Office)
-
20
VBA シートをコピーする際に Copyメソッドは失敗しましたのエラーが出てしまいます
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAマクロ実行時エラーの修正に...
-
Excel UserForm の表示位置
-
特定の色のついたセルを削除
-
【VBA】【ユーザーフォーム_Lis...
-
エクセルVBA 配列からセルに「...
-
【Excel VBA】一番右端セルまで...
-
C# DataGridViewで複数選択した...
-
Excelで空白セル直前のセルデー...
-
Excel VBAでCheckboxの名前を変...
-
DataGridViewでグリッド内に線...
-
CellEnterイベント仕様について
-
関数の引数でrangeを指定したとき
-
ExcelVBAでセル選択範囲ウィン...
-
昨日、質問した件『VBA にて、...
-
Excel 範囲指定スクショについ...
-
VBA 検索結果の行を取得。上か...
-
入力規則のリスト選択
-
EXCEL 2010 VBAでピボットで複...
-
数式バーに表示される値(文字...
-
VBA にて、条件付き書式で背景...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAマクロ実行時エラーの修正に...
-
Excel UserForm の表示位置
-
エクセルVBA 配列からセルに「...
-
EXCEL VBA 文中の書式ごと複写...
-
特定の色のついたセルを削除
-
【Excel VBA】一番右端セルまで...
-
Excelで空白セル直前のセルデー...
-
【VBA】写真の貼り付けコードが...
-
VBAコードについて教えてくださ...
-
【VBA】【ユーザーフォーム_Lis...
-
Excel 範囲指定スクショについ...
-
VBAでユーザーフォームにセル値...
-
VBA:日付を配列に入れ別セルに...
-
VBA にて、条件付き書式で背景...
-
Excel VBAでCheckboxの名前を変...
-
複数指定セルの可視セルのみを...
-
Excel VBA IF文がうまく動作し...
-
エクセルのカーソルを非表示に...
-
入力規則のリスト選択
-
VBA 複数条件の分岐処理の上手...
おすすめ情報