- ベストアンサー
エクセルマクロで、現在の時刻を記録するには?
mu2011の回答
- mu2011
- ベストアンサー率38% (1910/4994)
一例です。 D列に入力済みの場合、E列に退勤時刻を表示としています。 If Range("D1").Offset(Day(Date) - 1) = "" Then Range("D1").Offset(Day(Date) - 1) = Format(Time, "h:mm") Else Range("E1").Offset(Day(Date) - 1) = Format(Time, "h:mm") End If
関連するQ&A
- エクセルでマクロの記録が出来ません。
エクセルでマクロの記録が出来ません。 エクセルのA列とB列に1,000行のデータがあります。 マクロの記録を起動します。 1.B1セルを選択 2.右クリックで挿入を選択 3.A列とC列にデータが有り、B列は空白となる。 4.B1セルを選択します。右クリックの貼り付けを選択。 マクロの起動前にクリップボードにあらかじめコピーしておいた 以下の式を貼り付けます。 =IF(A1="","",IF(ISERROR(FIND("-",ASC(A1))),IF(LEFT(ASC(A1),1)<>"9",MID(A1,1,3) &"-"&MID(A1,4,5)&"-"&MID(A1,9,2)&"-"&MID(A1,11,2)&"-"&MID(A1,13,2),IF(LEFT(ASC(A1),2)= "9X",MID(A1,1,3)&"-"&MID(A1,4,11),IF(LEFT(ASC(A1),1)="9",MID(A1,1,5)&"-"&MID(A1,6,5)& "-"&MID(A1,11,2)&"-"&MID(A1,13,2),""))),IF(FIND("-",ASC(A1))=6,A1,MID(A1,1,3)&"-"& MID(A1,4,11)))) 5.「Ctrl」+「C」 6.エクセルの左上の名前ボックスを B1 → B1:B1000に変更。B列が選択されます。 7.「Ctrl」+「V」 8.B列に式で変換されたデータが入りました。B列が選択されたままです。 9.「Ctrl」+「C」 10.右クリックで形式を選択して貼り付けで「値」を選んでOKをおす。 セルに入っていた式は全て消えました。B列が選択されたままです。 11.マウスポインタをセルのA1におく。B列の選択が解除されました。 マクロの記録を終了 これでNO.4の操作の時に「記録できません」と表示されます。 データを一旦削除し、再度、A列とB列にデータを入れて マクロを実行してもデータB列がC列に移動しB列は空白です。 実際にマクロの記録中でもNO.1からNO.11の操作は出来ています。 なぜ記録されないのでしょうか? どうすれば記録できますか? よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルで数式を作りたいのですが・・・
エクセルについての質問です。 下記のように7行目にカウンター(マクロ)を作っているとします。 列 A B C 行 来客数 11時(現在時刻) 1 10(時) 2 11(時) 4 3 12(時) 4 13(時) 7 来客数 4 @(←ボタン) 上記のようなエクセルシートでボタン(@)を押すとC列の時刻とA列で同じ時刻の行B列に値を反す式をご示唆ください。お願いいたします。ちなみに現在時刻は=TODAYから=HOUR()で反しています。
- 締切済み
- オフィス系ソフト
- エクセルのマクロ
教えてください。 A B C 1 部品番号 ○ 済印 2 111111 ○ 済 3 222222 ○ 済 4 333333 ○ という表があるとします。 B列にマクロのボタンを作っておき、 A列に部品番号を入力したら、マクロのボタンを押して、 C列に済、という字を表示したいのです。 1部品入力するごとに、その表示をさせたいです。 2行目、3行目・・・と一つずつマクロを登録して いく方法は、(マクロについては詳しくないので、マクロの記録、マクロの停止、という方法しかわかりません)入力するデータが100件以上あるため、それもどうかな・・と悩んでいます。超初心者なのですが、何とか完成したいと思っています。 よろしくお願い致します。
- ベストアンサー
- オフィス系ソフト
- エクセルのマクロ(行を挿入し連番を振る)
ボタンを押すと以下のことを実行するマクロを作成することはできますか? A列2行目から 書類a 書類b 書類c 書類d 書類e C列2行目から 5 3 2 4 3 と入っています。C列は各書類の枚数です。 ボタンを押すと書類aと書類bの間に4行空白行が挿入され、A列とC列は増やした4行にそれぞれ書類a、5がコピーされ、B列には2列目から6列目まで1.2.3.4.5と連番が振られる。 というマクロです。 B列C列で1/5 2/5 3/5 4/5 5/5 であるという表現がしたいのです。(/は入りません) 書類が1枚の場合はB列C列共に空白で1/1とは入りません。 C列に入る書類の枚数により行が挿入されその書類の枚数分の連番が振られるようなマクロが作りたいです。 毎日何百行も手作業で挿入しコピーし連番を振る作業をしています。 決まった行数を増やすとか上の行をコピーするマクロならわかるのですが、C列の値を見て挿入する行数を判断するようなマクロができるのかわかりません。 どなたか教えて頂けないでしょうか。
- ベストアンサー
- Excel(エクセル)
- エクセルのマクロについての質問です。
エクセルのマクロについての質問です。 長文申し訳ございません。 Excelマクロが何度作り直してもうまく作動せず非常に困っております。 (1)ファイルAのシート1のDB列3行目に1の値をいれます。 (2)ファイルAのDC列172行目の値をファイルBのシート名が「1」のシートのD列4行目に入れます。 (3)ファイルAのDC列2733行目の値をファイルBのシート名が「1」のシートのD列6行目に入れます。 (4)ファイルAのDC列3128行目の値をファイルBのシート名が「1」のシートのD列7行目に入れます。 (5)ファイルAのシート1のDB列3行目に1.2の値をいれます。 (6)ファイルAのDC列172行目の値をファイルBのシート名が「1.2」のシートのD列4行目に入れます。 (7)ファイルAのDC列2733行目の値をファイルBのシート名が「1.2」のシートのD列6行目に入れます。 (8)ファイルAのDC列3128行目の値をファイルBのシート名が「1.2」のシートのD列7行目に入れます。 (9)以上のようにファイルAのシート1のDB列3行目に入れる値を0.2ずつ増やしていき、その値に対応したファイルBのシートに上記のように値を入れていくという動作を20まで繰り返す。 以上のようなマクロを作る事は可能でしょうか? マクロについて勉強はしているのですが上手く使いこなせず苦労しております。 長文の質問で大変申し訳ございませんがよろしければ皆さまのお知恵をお貸しください。 宜しくお願い致します。
- 締切済み
- Visual Basic
- エクセル 特定セルの足し算をするマクロ
C列、D列、E列を足し合計をF列に記入するマクロを教えて下さい。 (3行目から値のある行まで。) A B C D E F 1 2 3 24 16 19 59となる様に 4 35 49 41 5 22 19 72 6 ・ ・ ・ 7 ・ ・ ・ 宜しくお願いします。
- 締切済み
- オフィス系ソフト
- エクセルのマクロの記録について
こんばんわ。マクロの超初心者ですが、 最終的に、デフォルトの大きさのセルを、ボタンを押して自動で A1=行高 100 A2=行高 200 A3=行高 300 B1~B3は、結合 で完成となる物を作ろうとしています。(列幅は、考えない物としています) 手順として、マクロの記録をスタートして (1)1行目の行高を100にする (2)2行目の行高を200にする (3)3行目の行高を300にする (4)B1~B3を結合する で記録を終了します。そして再生をするのですが、A1~A3の行高がきちんと設定どおりになってくれません。 一応、行高を確認すると、3つとも、200になっています。どうも、100+200+300の合計の平均の行高に設定されてしまいます。 自分なりに考えて、B1~B3の結合のせいかなと思い、なら、セルの結合をマクロの記録から外してやってみました。 (1)あらかじめ、B1~B3を結合させておく (2)マクロの記録スタート (3)1行目、2行目、3行目をそれぞれ設定する で記録終了して、再生させるのですが、やっぱり同じ結果になってしまいます。 これは、エクセルの仕様なのでしょうか?それともなにか対処方があるのでしょうか? 一応、マクロの編集も少しは、がんばってこの2週間でちょっとだけは、できるようになったようなので(かなり怪しいですが・・・) どなたかアドバイスございましたら、お願いいたします。
- ベストアンサー
- その他MS Office製品
- マクロの記録で作成したマクロがデータが代わると誤動作する。
マクロの記録で作成したマクロがデータが代わると誤動作する。 エクセルファイルにてA列からJ列までデータがあります。 行数は2,000行です。データは全て半角です。 A列の値が 1=入庫 2=出庫 3=戻入 と全て置換 B列の値が 1=社内品 2=社外品 3=受入 と全て置換。 でこのB列が3で受入に置換えたら その隣のA列の値を 受入に置き換えたい。 さらに A列の値が置換え後の入庫と戻入場合はその行のJ列の値を切り取り、K列に貼付をし A列の値が置換え後の出庫の場合はその行のJ列の値を切り取り、L列に貼付をしたいです。 マクロの記録で行いましたが、 いったんデータを全て消して別データを貼り付けしたらA列B列の置換えは正常ですが B列が3の場合にA列を再置換えと、J列の値を切り取り、K列、L列への貼付が 誤動作します。 (別データは雛形は同じです。入力規則も同じですがデータは変わります。 例:セルA1のデータは1、 新しいデータはセルA1は2 等) マクロの記録中では、並べ替えでソートし上記条件でセルを選択しコピペをしました。 並べ替えは2回です。 マクロ文を見ると、セル名がずらずら並んで、セル番号が指定されてます。 (マクロ記録中に選択したセル番号が全部記録されてます。) 文を見ると、上記条件で置換えやコピペでなく このセルはこう置換え、このセルはこうコピペのように読めます。 これでは、データが代わったら、別の動きになるのかな?と思いました。 こういう場合はマクロではどうやって記録すればいいでしょうか?
- ベストアンサー
- オフィス系ソフト
- Excelでマクロを使用した削除に関して
マクロ初心者です。 Excelにて、以下のような表データがあるとします。 A列 B列 C列 D列 E列 … 1行 51 50 52 51 2行 50 a b c d 3行 51 e f g h 4行 52 i j k l この表の中で、A列と1行目の値が同じになる交点となるセルの値"以外"を 削除して以下のように表示させたいのですが、 その方法がわかりません。 A列 B列 C列 D列 E列 … 1行 51 50 52 51 2行 50 b 3行 51 e h 4行 52 k 単純な行削除・列削除ではないため、 頓挫しています。お知恵を拝借したく、よろしくおねがいします。
- ベストアンサー
- その他(プログラミング・開発)
- ある列のリアルタイム数値を3分毎に列をずらしながら記録するEXCELマクロを作りたい
EXECL2002 SP3を使っています。 B2からB99まで数式が入力されています。 この数式の結果はリアルタイムで変わります。 このリアルタイムデータを、 記録するマクロを作成したいと考えています。 9時1分から20時1分まで3分毎にデータを取得し、 C列、D列、E列、と列をずらしながら記録していきます。 以下のようなイメージになります。 ☆数式の状態 A B 1 =now 2 東京 =tokyo.temperature 3 千葉 =kanagawa.temperature 4 埼玉 =saitama.temperature ☆9時1分のシートの状態 A B C 1 9:01 9:01 2 東京 11.5 11.5 3 千葉 11.9 11.9 4 埼玉 10.8 10.8 ☆9時4分のシートの状態 A B C D 1 9:04 9:01 9:04 2 東京 11.6 11.5 11.6 3 千葉 12.1 11.9 12.1 4 埼玉 11.0 10.8 11.0 ☆9時7分のシートの状態 A B C D E 1 9:07 9:01 9:04 9:07 2 東京 11.8 11.5 11.6 11.8 3 千葉 12.4 11.9 12.1 12.4 4 埼玉 11.1 10.8 11.0 11.1 上記の作業を実現できるマクロを 教えていただけませんでしょうか。 よろしくお願いいたします。
- 締切済み
- オフィス系ソフト
お礼
入力済みの時にifとoffsetを使って退勤時刻を入力する方法も分かりました。これも使わさせてもらいました。参考になり感謝いたします。