エクセルVBAについて
下ような、最初に選択したセルに、次に選択したセルをコピーするマクロを使用しています。
Dim Frstcell As Range
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.MergeCells = False And Target.Count > 1 Then Exit Sub
On Error Resume Next 'エラーを無視
If Target.Column >= 5 And Target.Column <= 35 Then 'E:AIコピー先
Set Frstcell = Target.Cells(1)
ElseIf Target.Column >= 45 And Target.Column <= 46 Then 'AS:ATコピー元
If Target.Cells(1).Value = "" Then Exit Sub
Target.Copy Frstcell.MergeArea
End If
On Error GoTo 0 'エラートラップ終了
End Sub
この場合、コピー元の枠線の書式も、コピー先にコピーされてしまうのですが、
書式なしでコピーするにはどうしたらよいでしょうか?
よい方法がありましたら、よろしくお願いいたします。
お礼
うまくいきました!迅速なご回答感謝いたします! (1)の回答を下さった方も、マクロの記録、勉強になりました。 ありがとうございました。