次の処理を行うプログラムを書きたいのですが教えていただけないでしょうか？
(処理)
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
よろしくお願いします。
次の処理を行うプログラムを書きたいのですが教えていただけないでしょうか？
(処理)
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
よろしくお願いします。
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の動作を実行できるのでしょうか？
ご教授のほどよろしくお願いいたします。
Excel2003を使用しています。
マクロで、「選択した範囲で、A列-C列、または、F列-H列が0じゃなかったら、その行をコピーする」という処理をしたいのですが、どのようにコードを書いたらいいでしょうか？
当初は、「A列-C列が0じゃなかったら…」と条件がひとつだけで、そのときは、下記のコード(一部記載)で問題なく処理できていたのですが、条件をもうひとつ追加したら、エラーは出ないものの、結果が反映されなくなってしまいました。
マクロ勉強中ですので、ここはこんなふうにと指摘していただけると助かります。よろしくお願いします。
「A列-C列が0じゃなかったら…」
With Sheets("Sheet1")
For m = i To k
If .Cells(m, 1) - .Cells(m, 3) <> 0 Then
.Range(.Cells(m, j), .Cells(m, l)).Copy
↓
「A列-C列、または、F列-H列が0じゃなかったら…」
If( .Cells(m, 1) - .Cells(m, 3) <> 0 Or .Cells(m, 6) - .Cells(m, 8) <> 0) Then
( i, j, k, l で、それぞれ、選択範囲の1行目、1列目、最終行、最終列を取得しています。)
以下のようなシェルスクリプトを作成しましたが、
(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
-----------------------------------------------
