teratail header banner
teratail header banner
質問するログイン新規登録

質問編集履歴

4

kaizen

2019/10/04 06:08

投稿

退会済みユーザー
title CHANGED
@@ -1,1 +1,1 @@
1
- Range("A55").Value & Range("A56").Value関し
1
+ 複数のセル(A1とA2とA3など)入っいる値を一つの変数に代入したい
body CHANGED
File without changes

3

書式の改善

2019/10/04 06:08

投稿

退会済みユーザー
title CHANGED
File without changes
body CHANGED
@@ -1,4 +1,7 @@
1
1
  ```
2
+ Dim str As String
3
+ ```
4
+ ```
2
5
  str = Range("A1").Value & Range("A2").Value & Range("A3").Value
3
6
  ```
4
7
 

2

書式の改善

2019/10/04 05:58

投稿

退会済みユーザー
title CHANGED
File without changes
body CHANGED
@@ -5,6 +5,8 @@
5
5
  上記では、問題なく、できるのですが、下記では「型が一致しません。」になってしまい、うまくいきません。
6
6
  下記のように短縮して書く書き方ありませんでしょうか?
7
7
 
8
+ やりたいこととしては、複数のセル(A1とA2とA3など)に入っている値を一つの変数に代入したいです。
9
+
8
10
  ```
9
11
  str = Range("A1:A3").Value
10
12
  ```

1

書式の改善

2019/10/04 05:56

投稿

退会済みユーザー
title CHANGED
File without changes
body CHANGED
@@ -2,7 +2,7 @@
2
2
  str = Range("A1").Value & Range("A2").Value & Range("A3").Value
3
3
  ```
4
4
 
5
- 上記では、問題なく、できるのですが、下記ではうまくきません。
5
+ 上記では、問題なく、できるのですが、下記では「型が一致しません。」になってしまい、うまくきません。
6
6
  下記のように短縮して書く書き方ありませんでしょうか?
7
7
 
8
8
  ```