回答編集履歴
1
呼び出し方法を追記
answer
CHANGED
|
@@ -13,4 +13,11 @@
|
|
|
13
13
|
.Copy
|
|
14
14
|
End With
|
|
15
15
|
End Sub
|
|
16
|
+
```
|
|
17
|
+
|
|
18
|
+
以下のように呼び出します。
|
|
19
|
+
```VBA
|
|
20
|
+
Sub test
|
|
21
|
+
CopyToClipboad2 Worksheets("test").Range("B8").Value
|
|
22
|
+
End Sub
|
|
16
23
|
```
|