今日は雨がすごいのに傘もってきませんでした。 今日は変数を勉強してみます。 よく一般書籍とか新人研修って変数の事を箱っていいます。 そのとおり！！でも僕が入社したとき箱って抽象的過ぎてわからんかったので、 わかりやすく言うと、 数値とか文字列を…

今回はとにかくデータ型全部書いて見ます。 ソースコードから、任意のやつつかってね。 Dim 変数名 As データ型で定義します。 やってみます Sub DataGata() '数値' Dim a As Integer '-32,768 〜 32,767 Dim b As Long '-2,147,483,648 〜 2,147,483,647 Di…

今回は計算してみます。 以下の内容をします。 ・足す ・引く ・かける ・割る ・余り ・○乗するやってみます。 足します Sub calculationTasu() Dim sum As Integer sum = 5 + 5 MsgBox sum End Sub引きます Sub calculationHiku() Dim sum As Integer sum …

文字列はValueで書けるというのがわかりました。 でも複数のセルに書くにはどうしたら良いかなぁと考えました。複数書くときにRangeを使用すればいいんだ。 早速書いてみます Sub SelectColmn() Range("A1", "E7").Value = "Range1" Range("A8:E14").Value =…

次はソースコードの重複を削除してみます。 例えば次のような用件があったとする。 ・Sheet2を使用する ・B2に"やっぱりVBAってたのしいぜ"と記入 ・横幅がセルから出ないようにする ・縦幅は現在のセルの倍の高さに変更する以前までのdamePGならWorksheets…

次は幅の大きさを変更してみた。 文字打って、セルからはみでたらダサいやん。 はみ出したセルの横に文字打ったら、 はみ出した文字列は見えなくなるし、 もちろんエビデンスとしてそんなん提出したら 間違いなく現場で殺される。というわけで変更します。 …

今日は任意のシートに文字列を書いてみよう。 だいたいいままでActiveになっているシートにしか文字列を表示できていない。 ということは・・・・ Activeなページを任意で操作できればいいんだ。 それにはどうやらWorksheetsとActivateを使用する。 早速書い…

マクロを使用してセルに書き込むのをもっと掘り下げて詳しくやってみた。 前回ばRangeでセルを指定して、 Valueで指定したセルに文字列を書いたが、 今回はcellを使用してみた。 Sub SelectCellCell() Cells(2, 8).Value = "damePG" End SubどうやらCellsは…

次はひ一つの任意のセルを選択してみる。 選択するにはselectを使用する。 やってみた。 Sub Select() Worksheets("Sheet1").Range("B1","C12").Select End Subするとカーソルが動いた。 何か範囲指定できないのかな？ さっきのRangeをうまく使用してみたら…

文字列書きます。 文字列を出力するにはValue = "（任意の文字列）"を使用するようだ。 早速コードをかいてみた Sub SetValue() Worksheets("Sheet1").Range("A1").Value = "だめ" Worksheets("Sheet1").Range("B1").Value = "ダメ" Worksheets("Sheet1").Ra…

さて今日はExcelマクロに入門します。 マクロってなに〜〜？？ マクロとはググッてください。早速Excel開きます。で以下の図のようにします。 それを押して次は以下の図のように操作 するとEditaが出てきた。 どうやらここでコードを入力するみたいだ。 次は…