牛、豚、鶏、どれか一つ食べられなくなるとしたら?

If…もしも

の検索結果 (10,000件 81〜 100 件を表示)

Excel VBA IF文がうまく動作しないわけがわかりません…

…未熟な私ですが… セルC2の文字列の6・7桁目に入っている文字により、8桁目の文字を 置き換えるものをつくりました。 例えば、セルのC2に、IRCD-311234 という値があれば IRCD-31A234 に...…

解決

GetKeyStateについて

…こんにちは。GetKeyStateについて質問させていただきます。 VB6にて、APIの「GetKeyState」を使用し、Tabキーのキー入力判断を行っているのですが、その他の操作(GetKeyStateを判断しているフ...…

解決

VBAにWingdingsの文字って

…本日2度目の質問です。本当にすみません。 ■の代わりに□にレ点がはいったWingdingsの文字を使いたいのですが、?になって認識しません 対応策はないものでしょうか。 皆様、ご教示下...…

解決

VBAコードについて教えてください、 下記のコードを一つにまとめる方法を教えてください セル...

…VBAコードについて教えてください、 下記のコードを一つにまとめる方法を教えてください セルF18に "フラット設計審査_標準計算" が表示され 又は セルF18に"フラット設計審査_仕様基準" ...…

解決

マクロのエラー

…d(i, 2) = Sheets(1).Range("J58") 上記を以下のAX12に変更 d(i, 2) = Sheets(1).Range("AX12") d(i, 2) = Sheets(2).Range("J58") 上記を上記を以下のAX12に変更 d(i, 2) = Sheets(2).Range("AX12") を変更したところ型が一...…

解決

エクセルのBEEP音を変更したい

…エクセルのVBAに詳しい方教えてください。 以下のようにA列に上の値が違う時にBEEP音が5回鳴る関数を教えて頂きました。 現在worksheetに記述しています。 このBEEP音を違う音にしたいので...…

解決

VBAコードについて教えてください。

…作業ブックのシートに下記のコードを設定しております。 このコードは指定セルに("地番調査", "許可証")のどちらかの文字が表示された場合に 文字が表示された右横のセルに「後日図書の...…

解決

VBA Call BeforeDoubleClick(ByVal Target As Range)

…Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range)で、 セルA1をダブルクリックすると、プロシージャMacro1へとび、Macro1で所定の処理を行ったあと、もとのPrivate Sub Worksh eet_BeforeDoubleClick(ByVal Targ...…

締切

Accessフォームでの複数条件検索

…検索用テキストが4つとコンボボックスが1つあり、検索ボタンというコマンドボタンを押すと 該当するレコードを表示させるフォームを作りました。 以下がそのVBAです。 Private sub 検索...…

締切

エクセルで縦方向のオートフィルタはできないので、

…E4~Z4セルに、その列を表示させる場合は1を、させない場合は0が立つようにして If Range("E4").Value = 0 Then Columns("E:E").Select Selection.EntireColumn.Hidden = True End If If Range("F4").Value = 0 Then Colu...…

解決

オートフィルタで非表示セルの判定

…オートフィルタでフィルタ後、表示されない行にあるボタンを消したいのですが表示されていないセルの判定方法がわかりません。 下のマクロではエラーが出ます。 よろしくお願いします...…

解決

エクセルのマクロについて教えてください。

…下記のマクロは先日教えて頂いたマクロで 指定セル値の数字が該当した場合に移動元のフォルダが作業ブックに移動できるマクロになっておりますが、 移動元のフォルダ指定のコードが ...…

解決

Excel VBA ダブルクリックで入力 複数まとめる

…以下の式ように「送」を特定のセル範囲にダブルクリックで入力するようにしているのですが、 同じシート内で、同じようにダブルクリックして「〇」を入力したいセル範囲があります。 ...…

解決

アクセス フォームが存在するかを一発で取得したい

…フォームが50個くらいあるのですが 該当のフォームが存在するかvbaで取得したいのですが If CurrentProject.AllForms("フォーム1").IsLoaded Then のように、一発で取得する方法はありますか? ...…

解決

エクセルVBAのIFを使ったコピペ

…エクセルVBAについてご教示お願いします。 指定されたセルに特定の文字が入力された際に 特定のセル範囲からコピーしたセルの貼り付けを行いたいのですが うまくいきません。 A2に入...…

解決

マクロでの条件判断について

…A行に何かデータを入力した場合、同じ列のとなりの行のセルに入力時間を残したいと思い、 例 A1:あ B1:2006/5/9/16:00 A2:い B2:2006/5/10/18:00 以下のマクロを教えて頂いたのですが...…

解決

VBAでオプションボタンによってコンボボックスの内容を変える方法

…エクセルVBAのユーザーフォームでアンケートシートを作っています。 オプションボタン3つとコンボボックス1つで、和暦西暦とそれに対応する年数を表示したいと思っています。 オプシ...…

解決

エクセルでセルをクリックして“○”や✔マークを入力

…『エクセルでセルをクリックすると“○”と入力』という質問があり、皆さんの回答がわかりやすかったので、自分も一つ質問させて下さい。 同じシート内であるセルをクリックすると〇...…

締切

「:」について

…制御構造の場合、select caseとif elseの後は「:」をついか、一行でソースを書くの意味ですか。 例: If OPTO104(1).Value = True Then    OPTO104(1).SetFocus Else: OPTO104(2).SetFocus End If 宜しくお願い...…

解決

ExcelVBA エラー処理で2回目の同一エラーは

…こんにちは。 EcxelVBA初心者です。 セルD8~D10の値をCP44~CP100の値と比較し、一致したら8~10行目のそれぞれのセルに記入する際、 CP44~CP100に一致しない場合(エラー91)、エラー処理でメッ...…

解決

検索で見つからないときは質問してみよう!

Q質問する(無料)