ホーム >

ブログテーマ >

コンピュータ >

Office VBA

このテーマに投稿された記事：146件 | このテーマのURL:https://jugem.jp/theme/c247/7080/

Tweet
Check

: VBAに関するTipsだけではなく、困ったことや失敗談など個人的なことを気軽に投稿しあえればいいなと思っています。
リンクやトラックバックも活用して、初心者から上級者までが活用できるもの。また、緊張をほぐしたり共感できるものなども充実できたらいいと思います。
: 作者のブログへ：「iblog」さんのブログ
その他のテーマ：「iblog」さんが作成したテーマ一覧(6件)

このテーマで記事を投稿する

3-13 入力フォーム作成(7)組フレーム?

JUGEMテーマ：Office VBA Private kumi As Byte Private Sub km1_Click() If km1.Value = True Then kumi = 1 End If End Sub Private Sub km2_Click() If km2.Value = True Then kumi = 2 End If End Sub Private Sub km3_Click() If km3.Value = True Then kumi = 3 End If End Sub 登録 Cells(gyou + 1, "g").Value = kumi km1.Value = False km2.Value = False km3.Value = False

ニャン太郎の叫び | 2019.05.17 Fri 23:20

3-13 入力フォーム作成(7)組フレーム?

JUGEMテーマ：Office VBA フレーム：オプションボタンをグループ化する。

ニャン太郎の叫び | 2019.05.17 Fri 21:55

3-13 入力フォーム作成(6)学年オプションボタン?

JUGEMテーマ：Office VBA Private gnen As Byte Private Sub nen1_Change() If nen1.Value = True Then gnen = 1 End If End Sub Private Sub nen2_Change() If nen2.Value = True Then gnen = 2 End If End Sub Private Sub nen3_Change() If nen3.Value = True Then gnen = 3 End If End Sub 登録 Cells(gyou + 1, "f").Value = gnen nen1.Value = False nen2.Value = False nen3.V...

ニャン太郎の叫び | 2019.05.16 Thu 17:53

3-13入力フォーム作成(6)学年オプションボタン?

JUGEMテーマ：Office VBA オプションボタン　nen1 nen2 nen3 を作成　 GroupName:gakunen

ニャン太郎の叫び | 2019.05.16 Thu 16:54

3-13 入力フォーム作成(5)ふりがなテキストボックス

JUGEMテーマ：Office VBA Private Sub simei_Change() Dim furi As String If simei.Value <> "" Then furi = Application.GetPhonetic(simei.Value) furigana.Text = StrConv(furi, vbHiragana) End If End Sub 登録 Private Sub 登録_Click() Call hani Cells(gyou + 1, "i").Value = simei.Text Cells(gyou + 1, "j").Value = furigana.Tex...

ニャン太郎の叫び | 2019.05.15 Wed 14:48