pkh4989 の回答履歴

excelで困っています。 A 　 　　　B　　　　　　　 りんご 　 私は　りんご　すきです　 ばなな　　 私は　ばなな　　すきです みかん　 私は　みかん　すきです 私は＜Ａ行＞　好きです というように、ＢにＡ行の文字列を入れるにはどうすればよいでしょうか？ よろしくおねがいします・・・

下記コードを実行すると、myCell.Selectのところで 実行時エラー’91’ オブジェクト変数またはWithブロック変数が設定されていません。 というエラーが出るのですが、どうすれば対策出来るのでしょうか？ Sub test() Dim i As Long Dim myCell As Range With Range("A1").CurrentRegion For i = 2 To .Rows.Count Step 2 If i = 2 Then Set myCell = .Rows(i) Else Set myCell = Application.Union(myCell, .Rows(i)) End If Next i End With myCell.Select End Sub

二つのテーブルをマージした後に、時間毎の平均値を取得したいのですが SQLServerではどのように書けばよろしいでしょうか？ oracleだと↓こんな感じ select ti , avg(va) from ( select date as ti, value as va from test_table union all select date as ti, value as va from test1_table ) group by ti マージしたいテーブルを取得するSQL文をいじらずに実行できる方法を探しています。 以上、宜しくお願いします。

Excelの集計表の作成について教えてください。 Accessから出力したデータ（日別、作業別、その件数）の一覧表を作りたいと思っています。 今のところ、このような状態になっています ↓↓ 　 　　 A 　　　B　　　　C 　　　 1 　 日付　　作業名　　件数 2 　1日 　 作業A　　　　　100 3　　1日 　　作業B 　 　100 4 　 2日 　作業A 　　100 　　　　 コレをこのような状態に変えたいんです ↓↓ 　 　 A 　　　　 B 　　　 　 C　　　　　　D 1 　日付　　　作業A　　作業B　　作業D 2　1日　　　　100　　　100　　　　50 　 3　2日　　　　100　　　100　　　　50 （行→日にち　　列→作業名） ボタン１つで出来るようにしたいのでマクロ、VBAを使用したいです。 どなたかお知恵を貸していただけないでしょうか。

ＶＢＡはぜんぜん知りません。 今回、エクセルセルに、男・女、または１・２・３・４・５等を入力し、そのセルをクリックすると、表示はそのままで○を表示するようにしたいのですが、回答をお願いします。

VBAの初心者です。 Excelでアクティブセルの座標値を取り出して、マクロの中で、その行全体、あるいは列全体を指定して挿入や削除をさせたいのですが、どうしたらよいのでしょうか。教えて下さい。よろしくお願いします。 （例）アクティブセルが C7 であるとき、Rows("7:7") に１行挿入する。 Sub 行挿入() 'セル座標値を読み取ってその行全体を指定するデータの渡し方？？？？？ Rows("7:7").Select Selection.Insert Shift:=xlDown End Sub

同一フォルダ内のBOOK2.xlsを自動的にマクロで開く方法を教えてください。 ファイルが置いてある場所はネットワーク上にあります。 Workbooks.Open ("\\PC2\フォルダ1\BOOK2.xls") という指示をしたのですがエラーが表示されてしまいます。 行いたいことは現在開いているBOOK1.xls（置いてある場所【\\PC2\フォルダ1】でBOOK2.xlsと同じ） にBOOK2.xlsの一部の内容をコピーしたいのです。 ですので同じフォルダ内のBOOK2.xlsという指定があるとできるのかなっと思いました。 そのような指定の仕方があれば教えてください。 また、無いのであれば、他の方法などありましたら教えてください。 ↓現在のマクロ Workbooks.Open ("\\PC2\フォルダ1\BOOK2.xls") Workbooks("BOOK2.xls").Sheets("Sheet1").Range("A1:AP2").copy Destination:=Workbooks("BOOK1.xls").Sheets(1).Range("DQ1" & R)

似たような質問がありましたが、ちょっと違うパターンなので新しく質問を設けさせていただきます。 類似回答がありましたら申し訳ありません。。 ExcelにてB5サイズにて印刷するものが複数あります。 各シートの余白に統一性は無く、上下左右の余白が個々バラバラです。 左右の余白に関してはバラバラでも問題ないのですが、上下の余白が統一されていないシートでも、縦中央左に何らかの印（・でも-でもかまいません）を入れる方法をご存知の方はいらっしゃいませんか。 各シートが数個ならば、それぞれの余白にあわせて縦中央の左側に印を付けていくことも出来ますが、そのシート数が20以上あり、それぞれ 印刷→二つに折って中央の大体の位置を知る→中央辺りに印を付けていく という作業をしていると、半日は経過してしまい、その間に他の仕事が出来なくなってしまいます。。 そもそも、パンチ穴をいちいち折ってから空けるのが面倒だという職場の某方から依頼されたことなのですが、私としては折ってパンチした方が早いのでは・・・と言う勇気がなく（滅 どんな方法でもかまいません。マクロならばマクロの方法をご教授いただければ幸いです。よろしくお願いいたします。

エクセルのマクロを開く際、保護の為パスワードを設定しましたが、忘れてしまいました。 何とかして開く方法はないでしょうか？

Access超初心者です。 アンケートの集計を取りたいのですが、住所ごとに細かく数えたいです。 例えば、○○市●●区△△町▲▲の場合、▲▲で何件かを知りたいのですが、今集計されているのは●●区で何件という形になってしまっています。 住所にはコードがつけてあり○○●●△△▲▲という感じで数字が振ってあります。 ▲▲のところは3桁で001は一丁目002は二丁目みたいになっているのですが、単純に▲▲でカウントしてしまうと、○○市●●区△△町までが違っていても一丁目が何件という数になってしまいますよね？ そうではなくて、○○市●●区△△町一丁目で何件、○○市●●区△△町二丁目で何件という数を知りたいのですがどうやって条件をつけたらいいのかわからないので教えて頂きたいです。 質問の内容もわかり難いかと思いますがどうぞよろしくお願いいたします。 Access始めたばかりなので難しいことがわかりません。 どうかお力を貸して頂きたいです。

シート１にチェックボックス その他シート名＝1月～12月 とあり、チェックボックスにチェックを入れると今月の月のみのシートを表示させる方法（シート１はそのまま）。またチェックが外れると全月シート表示に切り替わる（シートの位置は変わらず）。 といった感じのことをやりたいのですが、書式のシート表示の設定は調べてわかったのですが、チェックボックスで切り替えがしたので分かる方よろしくお願いします。

ＶＢＡはぜんぜん知りません。 今回、エクセルセルに、男・女、または１・２・３・４・５等を入力し、そのセルをクリックすると、表示はそのままで○を表示するようにしたいのですが、回答をお願いします。

For t = 0 To 6 Picture1.Line (0, 0)-(100 * Cos(t), 100 * Sin(t)) Next t こういうfor文だと、一瞬でtが6まで行ってしまうので アニメーションとして成り立ちません。 ゆっくりfor文を実行させたいのですが そういうのはあるのでしょうか？

ＶＢＡに関してまったくの知識がありませんが これから勉強をしようと思っています。ですが その前に仕事でやらなければいけない事があり 困っています。 「修正前] [修正後] 1月12日　　　　　1月12日 1月13日　　→　　1月13日 2月14日　 　　2月14日 excelで月のデータが入力されています(修正前)。それを月が 変わり次第、改行できるマクロを作りたいと思っています。(修正後） もしわかる方いましたら、よろしくお願い致します。 また初心者でもわかりやすいＶＢＡの参考書でお勧めが ありましたらよろしくお願い致します。

「修正前] 　　　　　　[修正後] 1月12日　　　　　　　　1月12日 1月12日　　→　　　　　1月12日 1月13日　 　　　　　　　　　　　　　1月13日 excelでデータが入力されています(修正前)。それを日が 変わり次第、改行できるマクロを作りたいと思っています。(修正後） ですが、まったくのVBA初心者であり、これから勉強しようと 思っているのですが、仕事ですぐにやる様に言われ焦って います…。 もしわかる方いましたら、教えてください。よろしくお願い致します。 先日間違いて投稿してしまったので、再度投稿です。

エクセル　VBAにてブックを閉じるときに作業をして追加した ワークシートを昇順、もしくは降順（名前、日付など）に 並び替えてから閉じるように する方法がわからないのですが？ どのようにやるのでしょうか？

VB6.0,ACCESS2000で開発しています。 ACCESSのデータをMSHFlexGridに表示していますが 行数が多くなると右端にスクロールが出ます。 スクロールが出ないときでMSHFlexGridの幅を設定しているので スクロールが出たときは右端の項目が切れてしまい 下にもスクロールが出てしまいます。 これを何とかしたいのですが簡単に修正できる方法は 無いでしょうか？ お願いします。

メーカーに勤務しています。計測器の管理業務をしています。大量の計測器の新規登録(整理番号の割当)はAccessで行い、新規に登録した分の計測器管理表をExcelで作成してプリントアウトしExcel上と用紙の両方に校正日と次回校正日の記録を残しています。PCでの作業は単純ですが量が多いため煩雑です。そのため、AccessとExcelをリンクさせて作業の簡略化をしたいです。計測器を登録するときはAccessで新規登録するだけで計測器の管理表まで作成できるようにして、校正日と次回校正日の更新は1クリックでできるようにしたいです。何かよい方法があれば連絡願います。

Application.StatusBar = "ただいま、○○作成中です。" Application.StatusBar = False ステイタスバーに上記のように表示させるようにしていますが、この表示(ただいま、○○作成中です。）を画面中央部に表示させたいのですが、御教示お願い致します。

Application.StatusBar = "ただいま、○○作成中です。" Application.StatusBar = False ステイタスバーに上記のように表示させるようにしていますが、この表示(ただいま、○○作成中です。）を画面中央部に表示させたいのですが、御教示お願い致します。