VB(というかプログラミング)の超初心者です。
Excelシートの任意の領域にある数値を、配列変数に一括して
入力したいと思っています。
これまで、
Dim XXX(10) As Variant
For I = 1 To 10
XXX(I - 1) = Cells(1, I).Value
Next I
Range(Cells(10, 1), Cells(10, 10)).Value = XXX
の様な感じで処理していましたが(最近まで、セルへの書込みも
For-Nextで処理していました)、データ数が多くなると処理に
時間がかかってしまいます。
配列YYYへの読込みもセルへの書込みの様に一括して行うには
どうすれば良いでしょうか？
よろしくお願いします。
以下のようなシェルスクリプトを作成しましたが、
(file-name) get: No such file or directory
(file-name) done: No such file or directory
のエラーメッセージが出てしまい、うまくいきません。
OSはLinux(FedoraCore4)です。
どうやらファイル名の取得がうまくいかず、エラーになっている
様です。
試しに直接ファイル名を指定して書くと、無事ファイルを
取得できます。
エラーの原因がお分かりになる方、どうぞ宜しくお願い致します。
-----------------------------------------------
#!/bin/sh
cd /local_test/log/
ftp -n xxx.xxx.xxx.xxx<< _EOF
user test_user test_pass
cd /test/log/
ascii
prompt
for i in *.log
do
chmod u+r $i
get $i
chmod u-r $i
done
bye
_EOF
exit 0
-----------------------------------------------
VBAについて教えてください.
(当方初心者です)
VBAでユーザー定義関数で
計算しているセルから相対的な位置に値を入力したいのです.
より具体的に言うと、例えば
B3のセルでユーザー定義関数を用いて計算します。
その関数で計算した結果である一定の条件を満たした時にだけ
その関数で計算しているセルから2行2列隣のセルに
特定の値を入力したい場合にはどうすればよいのでしょうか？
試しに簡単に書いてみたのが以下です。
-------------------------------------------
Sub test1()
ActiveCell.Offset(2, 2).Value = 100
End Sub
Function test2()
test1
End Function
-------------------------------------------
これだとtest1を単体で実行した場合は上手く動作するのですが
test2でtest1を呼び出した場合はエラーになります。
これをどう直せばtest2内でtest1の動作を実行できるのでしょうか？
ご教授のほどよろしくお願いいたします。
次の処理を行うプログラムを書きたいのですが教えていただけないでしょうか？
(処理)
B列のあるセルの値が2000または2001の場合、当該行のc列からn列までのセルをコピーし、11行を挿入し、行列を入れ替えて貼り付ける。
この処理を繰り返したいです。
(処理前)
A B C D E F G H I J L M N O
1 2000 1 2 3 4 5 6 7 8 9 10 11 12
2
3
4
5
6
7
8
9
10
11
(処理後)
A B C D E F G H I J L M N O
1 2000 1
2 2
3 3
4 4
5 5
6 6
7 7
8 8
9 9
10 10
11 11
12 12
13 13
よろしくお願いします。
