忍者ブログ
ブログ主が仕事や個人的に学んだPC系・プログラミング系(VBAとかHTML)について書いていく備忘録ブログ。 ※ここで記載する内容はあくまで「個人的に」上手くいく内容です。ご使用には十分注意してください
[1] [2] [3] [4] [5] [6
Posted by 若槻風亜 - 2030.12.31,Tue

閲覧いただきありがとうございます。

このブログ内で掲載します内容は、ブログ主が仕事で
学んだこと、個人的に学んだことです。


<注意点>
ブログ主が行う分には何の問題も起こしていない内容が
主となりますが、環境によっては何か起こる可能性もございます。

ブログ内の内容を参照なさる場合は十分ご注意ください


<お断り>

 1・何か問題が起きた場合、当方はいかなる責任も
   負いかねますのであらかじめお含みおきください。

 2.ご使用は自由ですが、無断転載は禁止です。
   事前・事後は結構ですが必ずご連絡ください
   また、リンクを貼っていただけると分かりやすいので
   ありがたいです



このブログ内の情報が訪れた方のお役に立てることを祈っております。



拍手[0回]

PR
Posted by 若槻風亜 - 2030.12.30,Mon

もしも当ブログ主に何かご質問・ご意見等ございましたら
こちらの拍手またはコメントからどうぞ。


返信は、

 1.返信記事
 2.コメント返信欄
 3.質問の返答に値する記事

のいずれかで行います。



※ご注意※

 1.該当する記事がある場合はそちらの記事から

   ご質問・ご意見いただけるようお願いします
   (例:Troviについて→Troviの記事)


 2.ご質問・ご意見いただきました内容全てに完璧に
   お答え出来るとは限りませんのであらかじめ
   お含み置きください



拍手[0回]

Posted by 若槻風亜 - 2017.11.13,Mon
■フリーソフト■


<ソフト名>
 テキスト★カウントダウン

以前このブログ上で公開した「テキスト
カウントダウン」をVer1.1ということで
ベクターさんの方で公開いたしました。


ベクターさんサイト


<変更点>
1.設定値が消した後でも残るように修正
 (ただし保存タイプの上書きは保存後に
  反映される)
2.テキスト箇所の幅が広がるように修正
3.現在のファイル名を追加(保存後のみ)
4.変更チェックを追加(未保存時に
  消そうとしたら確認メッセージ表示)



何かおかしな点等ございましたら
ご連絡ください。可能な限り対応いたします。


拍手[0回]

Posted by 若槻風亜 - 2017.08.27,Sun

(対象)Excel VBA
(確認)Excel2010、2013


今回はExcelのフォーム上に配置したコントロールを
変数に格納して使用する方法です。


(手順)
1.変数を準備。この時、使用するのはただの
  「TextBox」などではなく、「MSForms.」と
  頭についているものにする

  → 例)Dim FText As MSForms.TextBox
      ↑フォーム上のテキストボックス


2.「Set」を使用して変数に格納

  → 例)For CNT = 1 To 5
             Set FText = Me.Controls("Text_テキスト" & CNT)
             FText.Text = ""
        Next


(実際の使用例)
 オープン時  : 中身を削除
 ボタン押下時 : コントロールの名前を格納

 ↓ ソース
 
 Dim FText As MSForms.TextBox
 
 
 Private Sub UserForm_Initialize()
     '■初期化
     For CNT = 1 To 5
         Set FText = Me.Controls("Text_テキスト" & CNT)
         FText.Text = ""
     Next
 End Sub
 
 Private Sub Bt_表示_Click()
     '■順次コントロール名を格納
     For CNT = 1 To 5
         Set FText = Me.Controls("Text_テキスト" & CNT)
         FText.Text = FText.Name
     Next
 End Sub





同じようなコントロールがいくつも出てくるとき
などに非常に便利です。


シート上のコントロールに入れる方法は割とすぐに
見つかりましたが、こっちの「MSForms」は中々
出てこなくて最初ちょっと困りました。

拍手[0回]

Posted by 若槻風亜 - 2016.12.27,Tue

(対象)VB2010(VB.NET)


初歩的ですがブログ主はよく忘れて
何度もグーグル先生にお尋ねしてました。


<昇順>
 Array.Sort(配列)    '---昇順

 配列の中身
  1,4,6,2,9,3 → 1,2,3,4,6,9
  ねこ、いぬ、たぬき、きつね → いぬ、きつね、たぬき、ねこ


<降順>
 Array.Reverse(配列) '---降順

 ※降順に並べ替える場合は先に昇順で
  並べ替えましょう

 配列の中身
  1,2,3,4,6,9
  いぬ、きつね、たぬき、ねこ


拍手[0回]

プロフィール
HN:
若槻風亜
性別:
女性
職業:
会社員
趣味:
創作、プログラミング
自己紹介:
仕事や個人で学んだことをまとめておきたかったがために備忘録ブログを立ち上げました。
あくまで自分が学んだこと・自分が出来たことなので、ご覧くださる場合は参照レベルでお願いします。
ブログ内検索
カレンダー
10 2017/11 12
S M T W T F S
1 2 3 4
5 6 7 8 9 10 11
12 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30
P R
最新トラックバック
コガネモチ
フリーエリア



Template by mavericyard*
Powered by "Samurai Factory"
忍者ブログ [PR]