keirika の回答履歴

フィールド内の二桁または一桁の数字の下一桁の数字のみを呼び出す場合はどのようにすれば良いのでしょうか？ 例えば フィールド１ 12 5 20 2 の場合、下一桁の数字の 2 5 0 2 を呼び出したいのですが、 クエリでMIDやLEFT関数を仕様しても二桁の数字は可能ですが一桁の数字は呼び出せません。素人なので説明も下手ですがご教授お願いしまます 　

Excelで とあるセルを指定してそこからセルの中のものを取得するのではなく、指定された”セル名”（A4とかD3などのように）を取得したいのですがなにかやり方はないでしょうか。 よろしくお願いいたします。

エクセルの関数、ＬＯＯＫＵＰを使って、 患者ＩＤから患者名を引き出したいのですが、 ＩＤが不一致の場合は「該当なし」がわかるような表示にしたい。 現在はＩＤが一致しない場合、適当な？患者名が表示されてしまう。 シート１のＡ列に患者ＩＤ シート１のＢ列に患者名 以上の情報があらかじめ入力されています。 やりたいことは シート２のＡ列にＩＤを入力すると シート２のＢ列に患者名を表示。 ＩＤ入力しない場合は、空白。 ＩＤが一致しない場合は、不一致などの表示。 現在の計算式 シート２のＢ列に計算式が入力されています。 =IF(A1="","",LOOKUP(A:A,シート1!A:B,シート1!B:B)) 現在できていること。 ・患者ＩＤを入れなければ空白 ・患者ＩＤを入力し、シート１のＩＤが一致したら、患者名を返す。 困っていること ・患者ＩＤが一致しないと、適当な？患者名が表示される。

楽天市場にログインしてラッキーくじのページでIPとパスワードが記憶されません一回ごとにうちこまないといけない状態です以前はクリックすると以前の打ち込んだのが表示されていました　いつの間にかできなくなってしまいました　楽天サイトの検索でもクリックしても以前のが表示されません　説明が下手で申し訳ありませんが　どなたかよろしくお願いします

つい先ほどの質問　4150169　は掲示したコードが抜けておりましたので無視して、こちらにご回答ください。 ほんと抜けた話です。すみません。 以下のマクロtest01はエラーになります。 Sub test01() Dim wb As Workbook Set wb = Sheets(1).Copy 'エラー「オブジェクトが必要です」 End Sub もちろん Dim wb As Workbook Sheets(1).Copy Set wb = ActiveWorkbook と修正すればエラーにならないことは存じていますが、ふと疑問がわきました。 Sheets(1).Copyの段階であたらしいWorkbookが誕生していますよね。 ならば、そのWorkbookはオブジェクトではないのでしょうか？ Workbooks.Add　で誕生したWorkbookは Set wb = Workbooks.Add と変数wbにSetできるのに Set wb = Sheets(1).Copy ができないのが不思議です。 Set wb = ActiveWorkbook としないでもSheets(1).CopyをwbにSetする書き方はないのでしょうか？

こんにちは、何度も助けていただいているのですが、 また、わからないことがありまして進めなくなってしまいました。 どなたかアドバイス頂ければと思います。 現在Access2003にて会社の勤務表を作成するという課題に 取り組んでおります。 今回の疑問点は 入力用のフォーム　フォーム1にはユーザー名コンボボックス、 日付Calendarコントロール、出社時間、退社時間、作業時間、 作業内容テキストボックス、登録、クリアコマンドボタン、 勤務状況表示リストボックスの各コントロールがあります。 登録をする際には各コントロールを選択ないし入力をし、 登録ボタンで各コントロールの値を勤務状況表示リストボックス に表示するようになっています。（1日分の登録を1行で表示。 登録状況に関わらず1ヶ月毎に表示しているので、まだ何もしていなく ても1ヶ月分の31行が表示されており、毎日登録をしていくことで 時間などがうまっていくようになっています。） ここまでは何も問題ないのですが、 勤務状況表示リストボックスに表示されている任意の日付、 例えば8日の行を選択した時に8日の行に表示されている ユーザー名、日付、出社時間、退社時間、作業時間、作業内容を 入力をした各コントロールと連動し表示させるようにしたいのです。 いろいろ調べてはいるのですがなかなかいい方法が見つかりません。 今の段階では1日の行しか選択できない状態です。 どなたかよい方法をご存知ありませんでしょうか？ よろしくお願いします。

あるアンケート結果を一覧表にまとめました。 質問には「はい」（一覧表ではY）か「いいえ」（同じくN）で答えるものがあり、その中で(6)の質問では「はい」と答えて(8)の質問では「いいえ」と答えている人の数を別のセルに表示したい場合、どのようにすればいいでしょうか？ こんな感じの表です。 　　　質問 (1)　(2)　(3)　(4)　(5)　(6)　(7)　(8)　・・・ 回答者1　　Ｙ　 Ｎ　 Ｙ　 Ｙ　 Ｎ　 Ｙ　 Ｎ　 Ｎ　・・・ 回答者2　　Ｙ　 Ｙ　 Ｎ　 Ｎ　 Ｎ　 Ｙ　 Ｎ　 Ｙ　・・・ どうぞよろしくお願いします。m(__)m

J4セルへ入れている関数と式 =IF(F4=11,J3+C4,IF(G4=11,J3-C4,J3)) F・G列にはコード C列には金額 J列には差引残高 　J3の残高に対してF4が11だったらJ3+C4を 　　　　　　　もしG4が11だったらJ3-C4で差引残高を。。 質問です F・G列に入れている数字が11だけだと成立しているのですが やりたいことは11・12・13・14と四つのコードどれが入った場合でも 上記の計算式を成立させたい。 よろしくお願いします。 　　　　Jin1118

J4セルへ入れている関数と式 =IF(F4=11,J3+C4,IF(G4=11,J3-C4,J3)) F・G列にはコード C列には金額 J列には差引残高 　J3の残高に対してF4が11だったらJ3+C4を 　　　　　　　もしG4が11だったらJ3-C4で差引残高を。。 質問です F・G列に入れている数字が11だけだと成立しているのですが やりたいことは11・12・13・14と四つのコードどれが入った場合でも 上記の計算式を成立させたい。 よろしくお願いします。 　　　　Jin1118

住所録をもらったのですが、 同じ住所と郵便番号の場合「同上」か「空白」になっていて入力されていません。 見よう見まねでとりあえず郵便番号で1回の住所で１回実行する感じでマクロを作ってみたのですが、 Loop While ～の行で 「オブジェクト変数または With ブロック変数が設定されていません。(Error 91)」 とエラーが出て終わりません。 なぜこのエラーが出るのでしょうか？ Sub 同じ() Dim list(2) list(1) = "同上" list(2) = "" tmp2 = Val(InputBox("検索列")) LR = ActiveSheet.Cells(65536, tmp2).End(xlUp).Row For i = 1 To 2 Set 検索 = ActiveSheet.Range(Cells(1, tmp2), Cells(LR, tmp2)).Find(what:=list(i), LookAt:=xlWhole, LookIn:=xlValues) If Not 検索 Is Nothing Then StartAD = 検索.Address Do Cells(検索.Row, tmp2).FillDown Set 検索 = ActiveSheet.Range(Cells(1, tmp2), Cells(LR, tmp2)).FindNext(検索) Loop While Not 検索 Is Nothing And 検索.Address <> StartAD Else End If Next i End Sub

エクセルのマクロで次の様な検索が出来るようにしたいのです。 シート１にあるセル（毎回同じセルとは限らない）に、 「出席者」という文字が入っています。 その直下のセルに名前（毎回違った名前）が入っています。 例 A5＝出席者 A6＝山田、田中、鈴木 この名前（例のシート１のA6）データをシート２の特定のセルに表示させたいのです。 シート２にボタンを配置してそれをクリックしたら表示できるという風に。（シート２の特定のセルは仮にB10とします） 出席者と名前は毎回同じ位置関係ですが、 表示されるセルは決まっていません。 このような作業をマクロで出来ますか？ 出来るのでしたらそのマクロを教えて頂けますか？ 初心者です、分かり易い回答をよろしくお願いいたします。

googleとかでどこかのサイトを観覧して、戻るを押して前のページに戻ると、見終わったサイトの表示の色が変わってますよね！ その色を変える事はできますか？

ワード2007で文書作成時、章・節・項（見出しレベル1～3）まで設定し、文書作成完了後、目次を作成しようとして「参考資料タブ」の「目次グループ」から目次の自動作成を行うと、作成されたその目次自体が「第一章」となってしまい、作成文書の章構成がひとつづつずれてしまいます。ワード初心者で独学中のためいまいち解決策がわかりません。 どなたか解決法をご存知でしたらお願いいたします。

エクセルで以下のような1000行位のデータがあります。 Ａ列　Ｂ列 大阪　1,001　 東京　1,200 高知　1,300 大阪　1,200 なら　1,000 神戸　1,001 これらからＢ列が同じ数値の行を削除し、以下のように するにはどうしたら良いでしょうか？ よろしくお願いします。 Ａ列　Ｂ列 東京　1,200 高知　1,300 大阪　1,200 なら　1,000

Adobe Reader７の印刷ページが１０ページあります、Ｗｏｒｄですと印刷設定で（キャノン）最終ページからを選択すると複数部数でも印刷後すぐ閉じれます、Adobe Reader７はどう設定しても１ページから印刷を始めます、最終ページからの印刷出来ませんかお願いします、

ワード2007で、マイクに向かってしゃべったことが、そのまま 入力される機能があるかと思いますが、あれはどのようにすると 行えるでしょうか？

こんばんは。宜しくお願いします。 署名を使ったのですが、社内に出すメールがかなり多いので通常は署名を付けていません。 メールを新規で作成して署名を後から挿入する事は可能でしょうか？ ショートカットキーを併用して一番簡単な方法を教えていただけると助かります。

エクセルの並び替えについて質問させて頂きます。 下記のようにエクセルに文字列を入力しています。 Ａ　　　　　　　　　Ｂ　　　　　　 1　10011 　　ホワイト 2　　　　　　　　ブラック 3　　　　　　　　ブルー 4　10002　　 ブラウン 5　　　　　　レッド 6　　　　　　イエロー 7　10005　　 パープル　 8　　　　　　ネイビー 9　　　　　　サックス 　　　　 Ａ１に「10011」と入力してありますが、「10011」という品番に対してセルＢ1・Ｂ2・Ｂ3のホワイト・ブラック・ブルーのカラーが存在するという意味です。 ここで並べ替えを行いセルＡ１・Ａ４・Ａ７の数字を若い順（昇順）に並べ替えを行った場合、品番のみ昇順となり、カラーがその品番に対してキレイに並び替えが行われないのです。 最終的に下記のように並び替えを行いたいのですが、どのように並び替えを行えばよろしいでしょうか？よろしくお願い致します。 Ａ　　　　Ｂ　　　　Ｃ　　　…　　　 1　10002　　 ブラウン 2　　　　　　レッド 3　　　　　　イエロー 4　10005　　 パープル　 5　　　　　　ネイビー 6　　　　　　サックス　 7　10011 ホワイト 8　　　　　　ブラック 9　　　　　　ブルー 　　　　

皆様、よろしくお願いいたします。 最近、会社でOfficeをバージョンアップしました。 Word2000で作成してある規定のフォーマットに、 Excel2003で作成したデータをWord2003で差し込み印刷したいのですが、 Word2000/Excel2000でできていたように作成できません。 同様に作成する方法は何かないのでしょうか 質問(1) まずExcelに100件のデータがあるとします。 その中の1行目～20行目のレコードだけを差し込んで印刷する場合、 チェックボックスで範囲を指定するしかできないのでしょうか？ Excel2000とWord2000だとレコード指定を数字入力でできたのですが・・・。 質問(2) 差し込んでできたWordのデータを印刷する際に、 レコードがひとつずつしかプレビューで確認できないのですが、 差し込んだ全データを確認することはできないのでしょうか？ 質問(3) 差し込んでできたWordのデータを保存する際に、 差し込んだ後のデータの状態で保存できません。 どうすれば保存できますか？

エクセルで、行の１行目から１０行目までは編集不可（カーソルが行かない）に設定するマクロは出来るでしょうか。 セルの保護の活用を試しましたが、保護にすると並べ替え機能が使えなくなるので困っています。 編集は11行目から可能とし、並べ替え機能が使えるようにしたいのです。 どなたか、よろしくお願いいたします。