[pear_error: message="Success" code=0 mode=return level=notice prefix="" info=""]
JUGEMテーマ:Office VBA Private Sub CommandButton2_Click() Call hani Cells(gyou + 1, "s").Value = TextBox1.Text Cells(gyou + 1, "s").NumberFormatLocal = "000-0000" Range("t4:x4").Copy Cells(gyou + 1, "t").PasteSpecial (xlPasteFormulas) Application.CutCopyMode = False If IsError(Cells(gyou + 1, "x").Value) Then MsgBox "郵便番号が違います。" , 16 TextBox2.Text = "&...
ニャン太郎の叫び | 2019.05.25 Sat 17:36
JUGEMテーマ:Office VBA Private Sub TextBox1_AfterUpdate() Call hani Cells(gyou + 1, "s").Value = TextBox1.Text Cells(gyou + 1, "s").NumberFormatLocal = "000-0000" Range("t4:x4").Copy Cells(gyou + 1, "t").PasteSpecial (xlPasteFormulas) Application.CutCopyMode = False If IsError(Cells(gyou + 1, "x").Value) Then MsgBox "郵便番号が違います。" ' TextBox2.Text = &...
ニャン太郎の叫び | 2019.05.25 Sat 15:26
JUGEMテーマ:Office VBA Call hani Cells(gyou + 1, "s").Value = TextBox1.Text Cells(gyou + 1, "s").NumberFormatLocal = "000-0000" Range("t4:x4").Copy Cells(gyou + 1, "t").PasteSpecial (xlPasteFormulas) Application.CutCopyMode = False Cells(gyou + 1, "w").Value = "" TextBox2.Text = Cells(gyou + 1, "x").Value Formula:お決まりのやり方 paste:糊で貼る
ニャン太郎の叫び | 2019.05.24 Fri 16:27
JUGEMテーマ:Office VBA Call hani Cells(gyou + 1, "s").Value = TextBox1.Text Cells(gyou + 1, "s").NumberFormatLocal = "000-0000" Range("t4:x4").Copy Cells(gyou + 1, "t").PasteSpecial (xlPasteFormulas) Application.CutCopyMode = False Cells(gyou + 1, "w").Value = "" TextBox2.Text = Cells(gyou + 1, "x").Value
ニャン太郎の叫び | 2019.05.23 Thu 22:40
JUGEMテーマ:Office VBA 文字列の結合関数:CONCATENATE → 鎖状につなぐ
ニャン太郎の叫び | 2019.05.22 Wed 22:57
JUGEMテーマ:Office VBA =IF(論理式,真の場合,偽の場合) =if($s4="","",FILTERXML(WEBSERVICE("http://zip.cgis.biz/xml/zip.php?zn=" & $S4),"/ZIP_result/ADDRESS_value/value[@state]/@state")) =if($s4="","",FILTERXML(WEBSERVICE("http://zip.cgis.biz/xml/zip.php?zn=" & $S4),"/ZIP_result/ADDRESS_value/value[@city]/@city")) =if($s4="","",FILTERXML(WEB...
ニャン太郎の叫び | 2019.05.22 Wed 15:25
JUGEMテーマ:Office VBA API:自己のソフトウェアを一部公開して、他のソフトウェアと機能を共有できるようにしたものです。 郵便番号検索Web APIを利用すれば、下記のように郵便番号から住所を取得することもできます。 =FILTERXML(WEBSERVICE("http://zip.cgis.biz/xml/zip.php?zn=" & $A2),"/ZIP_result/ADDRESS_value/value[@state]/@state") =FILTERXML(WEBSERVICE("http://zip.cgis.biz/xml/zip.php?zn=" & $A2),"/ZIP_result/ADDRESS_value/value[@c...
ニャン太郎の叫び | 2019.05.21 Tue 21:47
JUGEMテーマ:Office VBA マウスのクリックやキーボード入力ができる状態:フォーカスを持つ フォーカスを取得できるかどうかは、TabStopプロパティで設定 タブ オーダーでフォーカス順番を決める
ニャン太郎の叫び | 2019.05.20 Mon 17:40
Private Sub 登録_Click() Call hani Cells(gyou + 1, "i").Value = simei.Text Cells(gyou + 1, "j").Value = furigana.Text Cells(gyou + 1, "f").Value = gnen Cells(gyou + 1, "g").Value = kumi Cells(gyou + 1,"o").Value = denwa.Text simei.Text = "" furigana.Text = "" nen1.Value = False nen2.Value = False nen3.Value = False km1.Val...
ニャン太郎の叫び | 2019.05.19 Sun 15:49
JUGEMテーマ:Office VBA IMEMode→1-fmIMEModeOn:IMEモードオン 全角 IMEMode→2-fmIMEModeOff:IMEモードオフ 半角
ニャン太郎の叫び | 2019.05.18 Sat 17:57
全146件中 41 - 50 件表示 (5/15 ページ)