入社半年!都内写真館とお手軽VBAで給与計算。今日はヨーグルトの日 | MOS学び中の三種の神器「アスペ*FTM*ロスジェネ」

MOS学び中の三種の神器「アスペ*FTM*ロスジェネ」

はじめまして、猫★シエスタと申します。
三種の神器がメインテーマです。
★ アスペルガー症候群(とっても疲れやすい)
★ 性同一性障害FtM(心は漢)
★ ロスジェネ(就職氷河期世代)


テーマ:

こんばんは、猫です。

昨日めでたく、入社半年を迎えましたクラッカー

 

この半年間、1ヶ月ぐらいの早さでした。

事務職の経験はあるとはいえ、

会社が変わると、顔、名前、作業手順諸々

色々新しくなり、覚えることで真剣でしたので、

あっという間でした。

 

 

職場と全然近くないのですが、

最近撮影した中で、気に入っている、

水元公園の写真です。

 

では、デイリー行きます。

最近、ヨーグルト食べた?

毎日食べています。

ヨーグルトのマシュマロ漬け美味しいですよ。

ふやけたマシュマロと、新しいマシュマロの

食感を楽しんだりして、細々と生きています(=^・^=)

お腹の弱い発達障害者なので、

ヨーグルトは欠かせません。

今日も2つ購入しました。

 

Yoghourtの「Y」を含む、VBAプロシージャ―を

掲載します。

「お手軽VBA」のコーナーでは、

プログラミング、ド素人の私が、

超初心者目線で入門の入門的な

プログラムを組んで備忘録として

利用しているコーナーです。

 

シェアしてはおりますが、

役に立つのかどうなのか、

良く分かりませ~ん(;^_^A アセアセ・・・

 

お給料は1ヶ月払いですが、

日払いとか、1週間払いという所も

あるそうで、

「1週間払い」だったら、どうなるのか、

ExcelVBAで作ってみました。

時給は仮に「9999円」とします。

実行するとこうなります。

 

黄色いセルは、最初は空です。

 

1週間は7日ですので、労働時間×時給の処理を7回繰り返す為に、

FOR~NEXT文を使っています。

では、実行して見ます。

 

 

お給料の総額は、メッセージボックスに表示させます。

 

 

では、プロシージャ―はこちらです。

 

~お手軽VBA~

 

------------------------------

Sub お給料1週間()

Dim okane As Currency
Dim i As Integer
Dim uketorigaku As Currency

Range("C2").Select

For i = 1 To 7
okane = ActiveCell.Offset(0, -1).Value * 9999
ActiveCell.Value = okane

ActiveCell.Offset(1, 0).Select

uketorigaku = okane + uketorigaku

Next

MsgBox "1週間のお給料は総額" & uketorigaku & "円です。何買おうかなぁ・・・"

End Sub
----------------------------------

 

お疲れ様でした。

ブレイクタイムPhotoは、

 

すみだ水族館のクラゲと・・・

 

 

 

レインボーブリッジです。

 

 

▼本日限定!ブログスタンプ

あなたもスタンプをGETしよう

----------------------------------------

● リンク・リブログ、フリー(ご自由にどうぞ)

ご意見のある方リブログをお願いします。

● 画像を使いたい場合は、メッセージ下さい

----------------------------------------

 
 
 
 
 
 
 
 

 

☆--------------------------------------------

限定99部絶賛(??)発売中!

ロスジェネ・アスペの生きづらさを綴った

猫★シエスタの著作本、

就職氷河期世代&大人の発達障害

も、宜しくお願い致します。

( 電子書籍版や時々中古本も出品されます。 )

--------------------------------------------☆

 

いつも「いいね」や、ご精読ありがとうございます。

ランキングボタンも宜しくお願いします

m(=^・^=)m

 

 

 

 

 

 

 

 

お客様へ「コメントを」(書きこむ前に)

 

 

 

 

 

 

 

 

宇宙一の歌姫

「かなぽん」こと本多加奈子さんのことを

ガンガン推して推して推しマッスル(=^・^=)

 

あなたも体感しませんか。

癒し系歌姫のボイスをドキドキビックリマーク

 

かなぽんの歌声はこちら

本多加奈子Official Blog

 

歌上手い、可愛い、料理も美味い、車の運転も安全運転・・・

もう、最高の歌姫ですラブラブ

 

 

猫★シエスタさんをフォロー

ブログの更新情報が受け取れて、アクセスが簡単になります

SNSアカウント

Ameba人気のブログ

Amebaトピックス