Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


24 / 3841 ページ ←次へ | 前へ→

【82008】Re:特定の色のセルを選択したいです
お礼  教えてください  - 22/3/31(木) 1:05 -

引用なし
パスワード
   マナ さん

早速ありがとうございました。

確かにそうですね!チェックボックスを作って条件付き書式を設定したら
やりたいことが出来ました。

どうもありがとうございました。
・ツリー全体表示

【82007】Re:特定の色のセルを選択したいです
発言  マナ  - 22/3/30(水) 21:48 -

引用なし
パスワード
   ▼教えてください さん:

何がしたいか今ひとつわからないのですが
マクロでなく

1)条件付き書式は利用できませんか
2)書式で検索・置換は利用できませんか
・ツリー全体表示

【82006】特定の色のセルを選択したいです
質問  教えてください  - 22/3/29(火) 23:20 -

引用なし
パスワード
   特定の色のセルを選択して
クリアするvbaを教えてください。

毎日のチェックリストを済にしたらセルの行をグレーにして
次の日に色をクリアして使いまわしています。
・ツリー全体表示

【82005】Re:A AND B OR (C OR D)をOR(AND(A,B),O...
お礼  しょうち  - 22/3/28(月) 9:01 -

引用なし
パスワード
   ▼よろずや さん:
>▼しょうち さん:
>>はじめまして表題のように
>>A AND B OR (C OR D)をOR(AND(A,B),OR(C,D))
>>などとVBAチックに書かれたStringデータを
>>エクセル調に変換したいです。
>
>やろうとなさってる事は、ポーランド記法への変換だと思います。
>残念ながら、ポーランド記法に関するページはほとんどありません。
>※逆ポーランド記法についてのページならたくさんあるんですけどね。
>LISP とか LOGO などを調べれば何かつかめるかも。
>
>お力になれず、ごめんなさい。


循環参照し、自己解決できました!
アドバイスありがとうございます!
・ツリー全体表示

【82004】Re:A AND B OR (C OR D)をOR(AND(A,B),O...
発言  よろずや  - 22/3/27(日) 13:18 -

引用なし
パスワード
   ▼しょうち さん:
>はじめまして表題のように
>A AND B OR (C OR D)をOR(AND(A,B),OR(C,D))
>などとVBAチックに書かれたStringデータを
>エクセル調に変換したいです。

やろうとなさってる事は、ポーランド記法への変換だと思います。
残念ながら、ポーランド記法に関するページはほとんどありません。
※逆ポーランド記法についてのページならたくさんあるんですけどね。
LISP とか LOGO などを調べれば何かつかめるかも。

お力になれず、ごめんなさい。
・ツリー全体表示

【82003】A AND B OR (C OR D)をOR(AND(A,B),OR(C...
質問  しょうち E-MAIL  - 22/3/26(土) 22:10 -

引用なし
パスワード
   はじめまして表題のように
A AND B OR (C OR D)をOR(AND(A,B),OR(C,D))
などとVBAチックに書かれたStringデータを
エクセル調に変換したいです。

splitや色々と試してみたのですが
汎用的に作ろうとすると
なかなか良いアイデアが思い付かず

よろしくお願いいたします。
・ツリー全体表示

【82002】Re:VBAについて教えてください
回答  どすん  - 22/3/15(火) 20:30 -

引用なし
パスワード
   まず、ユーザーフォームの初期化の所で、大カテゴリのコンボボックスのみ値をセット。
大カテゴリの値によって中カテゴリが決まるため値は入れないでおく。

Private Sub UserForm_Initialize()

  Me.ComboBox1.AddItem "大カテゴリ1"
  Me.ComboBox1.AddItem "大カテゴリ2"

End Sub


コンボ1の入力が終わったら、コンボ2の値をセットできる。
その際、コンボ1の値で条件分岐する。

Private Sub ComboBox1_AfterUpdate()

  If Me.ComboBox1.Text = "大カテゴリ1" Then
    Me.ComboBox2.AddItem "中カテゴリ1-1"
    Me.ComboBox2.AddItem "中カテゴリ1-2"
  
  ElseIf Me.ComboBox1.Text = "大カテゴリ2" Then
    Me.ComboBox2.AddItem "中カテゴリ2-1"
    Me.ComboBox2.AddItem "中カテゴリ2-2"
  End If
    
End Sub

同じようにコンボ2の値が決まったら、ラベルに値を入力。
これもコンボ2の値で条件分岐。

Private Sub ComboBox2_AfterUpdate()

  If Me.ComboBox2.Text = "中カテゴリ1-1" Then
    Label1.Caption = "小カテゴリ1-1-1"
    Label2.Caption = "小カテゴリ1-1-2"
    Label3.Caption = "小カテゴリ1-1-3"
  ElseIf Me.ComboBox2.Text = "中カテゴリ1-2" Then
    Label1.Caption = "小カテゴリ1-2-1"
    Label2.Caption = "小カテゴリ1-2-2"
    Label3.Caption = "小カテゴリ1-2-3"
'---
'---
'---

  End If
  
End Sub

流れとしては、こんな感じ。
・ツリー全体表示

【82001】VBAについて教えてください
質問  ヒマミン  - 22/3/15(火) 0:13 -

引用なし
パスワード
   ExcelのVBAについて教えてください。
3階層の表データをユーザーフォーム内の
ComboBox1・ComboBox2・Label1〜3に展開させたいのです。
添付の表がsheet1にあり、
ComboBox1で大カテゴリを選択し、ComboBox2で中カテゴリを選択し、
Label1に小カテゴリ1.を、Label2に小カテゴリ2.を、Label3に小カテゴリ3.を
表示させたいのですが、どのようにすればよいのか分からず困っています。
お分かりになる方教えてください。
よろしくお願いいたします。
・ツリー全体表示

【82000】Re:シートを指定してcsvで保存したい
回答  どすん  - 22/3/10(木) 5:57 -

引用なし
パスワード
   Sub CSVファイル出力()

  Dim 保存先 As String
  
  保存先 = ThisWorkbook.Path & "\集約.csv"
  Sheets("集約").Copy
  ActiveWorkbook.SaveAs 保存先, FileFormat:=xlCSV
  ActiveWorkbook.Close

  保存先 = ThisWorkbook.Path & "\精算.csv"
  Sheets("精算").Copy
  ActiveWorkbook.SaveAs 保存先, FileFormat:=xlCSV
  ActiveWorkbook.Close

End Sub
・ツリー全体表示

【81999】Re:シートを指定してcsvで保存したい
発言  よろずや  - 22/3/9(水) 16:35 -

引用なし
パスワード
   ▼プリマ さん:
>ひとつのExcelファイルに5つのシートがあります。
>その5つのシートの中から、「集約」と「精算」という名前のシート2つだけを
>それぞれcsvで保存するvbaを教えてください。

マクロの記録をやってみましょう。
・ツリー全体表示

【81998】シートを指定してcsvで保存したい
質問  プリマ  - 22/3/9(水) 13:56 -

引用なし
パスワード
   素人ですみませんが、教えてください。

ひとつのExcelファイルに5つのシートがあります。
その5つのシートの中から、「集約」と「精算」という名前のシート2つだけをそれぞれcsvで保存するvbaを教えてください。

よろしくお願いします。
・ツリー全体表示

【81997】Re:csvの読み込みエラーについて
発言  よろずや  - 22/3/2(水) 9:16 -

引用なし
パスワード
   がんばって!
・ツリー全体表示

【81996】Re:csvの読み込みエラーについて
回答  ちか E-MAIL  - 22/3/2(水) 8:57 -

引用なし
パスワード
   ▼ちか さん:
>▼よろずや さん:
>了解しました。ありがとうございます。
>正直進んでいるのか確認が取れなかったので、これはうれしいです。
>ちょっと確認してみます。
ありがとうございます、csvを確認していたら、項目の前に半角スペースがあり、マクロに組み込んでみたら、とりあえず読み込みはできるようになりました。
ただラベルのほうは空白になってしまうので、そちらはまだこれから、直せればと思います。
・ツリー全体表示

【81995】Re:csvの読み込みエラーについて
回答  ちか E-MAIL  - 22/3/1(火) 8:53 -

引用なし
パスワード
   ▼よろずや さん:
了解しました。ありがとうございます。
正直進んでいるのか確認が取れなかったので、これはうれしいです。
ちょっと確認してみます。
・ツリー全体表示

【81994】Re:csvの読み込みエラーについて
発言  よろずや  - 22/2/28(月) 21:18 -

引用なし
パスワード
   ▼ちか さん:
>▼よろずや さん:
>>まだまだ棘の道は続きます。
>>
>>見出しを入れ替えたなら、どこが変更になったのかを書き出して置いて、
>>実際のデータ処理のところを全部書き換える必要があります。
>>
>>最初のモジュールに戻って、何番目の項目が変更になったのか、それがどれと入れ替わったのかを探し当ててコードを書き換える必要があります。
>
>なるほど、では関連している項目データ処理を行っているところを書き直さないと、csvも開くことができない認識でよろしいでしょうか?
>
>セルの文字数とかの変更はどうにかなっても、関数の変更となると、もうお手上げになりそうですね・・・
>
>正直いろいろいじっていても、結局開けないので、進んでるのか、後退してるのがわからなくて…汗

プログラムを解読するために必須のテクニックがあります。
「ブレークポイント」
実行を一時中断したい場所の左に、クリックすると茶色に変わる所があります。
茶色にした状態でプログラムを実行すると、その茶色の所が黄色に変わります。
これが「実行中断」です。
その状態で、変数の上にマウスポインタをかざすと変数の中身が表示されます。
「F8」キーを押すと、1行ずつ黄色の行が進みます。
これが「ステップ実行」です。
こんな風にして、一つ一つ確かめながら解読していきます。
「F5」キーを押すと、最後まで一気に実行します。
頑張ってください。
・ツリー全体表示

【81993】Re:csvの読み込みエラーについて
質問  ちか E-MAIL  - 22/2/28(月) 13:25 -

引用なし
パスワード
   >それらの増減をどうするか、よく検討してください。

項目に関しては残念ながら、増減できないみたいなので。
このままうまくやる方法を見つけるしかなさそうです。

せっかく提案いただいたのにすみません。
・ツリー全体表示

【81992】Re:csvの読み込みエラーについて
発言  よろずや  - 22/2/28(月) 10:05 -

引用なし
パスワード
   ▼ちか さん:
>▼よろずや さん:
>
>>列の数が変わったのは痛いですね。
>>減ったのなら、もともと重要でない列だったのか?
>>増えたのなら、処理に必要な列なのか?
>>
>>場合によっては、プログラムの修正が必要になるかも知れませんね。
>>その辺はどうなのでしょう?
>
>いや、処理に必要ということではないのですが、お客様データをまとめているので、自由に記入できる項目が増えたという感じになります。
>
>大きな変更としては、住所が今まで、2つに分けていたのが、3つにわかれるようになったことですね。
>減った列はなさそうです。

それらの増減をどうするか、よく検討してください。
・ツリー全体表示

【81991】Re:csvの読み込みエラーについて
質問  ちか  - 22/2/27(日) 23:11 -

引用なし
パスワード
   ▼よろずや さん:

>列の数が変わったのは痛いですね。
>減ったのなら、もともと重要でない列だったのか?
>増えたのなら、処理に必要な列なのか?
>
>場合によっては、プログラムの修正が必要になるかも知れませんね。
>その辺はどうなのでしょう?

いや、処理に必要ということではないのですが、お客様データをまとめているので、自由に記入できる項目が増えたという感じになります。

大きな変更としては、住所が今まで、2つに分けていたのが、3つにわかれるようになったことですね。
減った列はなさそうです。
・ツリー全体表示

【81990】Re:csvの読み込みエラーについて
発言  よろずや  - 22/2/27(日) 22:56 -

引用なし
パスワード
   ▼ちか さん:
>いや、変更になったのは
>列の文面(例だと、顧客がお客様とか)
>列の並び
>全列の数
>が変わったところだと思います。

列の数が変わったのは痛いですね。
減ったのなら、もともと重要でない列だったのか?
増えたのなら、処理に必要な列なのか?

場合によっては、プログラムの修正が必要になるかも知れませんね。
その辺はどうなのでしょう?
・ツリー全体表示

【81989】Re:csvの読み込みエラーについて
質問  ちか  - 22/2/27(日) 22:33 -

引用なし
パスワード
   >
>わけの分からんものは、触らぬ神に祟りなしっちゅぅことでいじらん方がよいかと。
>
>CSV変換プログラムを新規作成がよろしいかと。
>実行時にひと手間増えますが......
>
>その前に、再確認。
>列の並び順が変わっただけなのですか?

なるほど、まったく違う方法ですね。。。

いや、変更になったのは
列の文面(例だと、顧客がお客様とか)
列の並び
全列の数
が変わったところだと思います。
・ツリー全体表示

24 / 3841 ページ ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free