papayuka の回答履歴

エクセルでシート１～３に月別のデータが入っています。 （データ形式は同じです） この１～３のシートのデータをコピペして一つのシートにまとめ これを印刷にかけたいのですが、 シート１のデータしか印刷されませんでした。 シート上の見た目は１～３すべてのデータが一つのデータとして まとまった状態で閲覧できる状態ですが プレビューにするとやはり「シート１」のデータしか閲覧できません。 とりあえずすべてのデータを範囲選択して印刷をかけたら きちんと望みどおりのすべてのデータが印字されたのですが この場合、範囲選択しなくても普通に印刷できないのでしょうか？ なぜ、こんな風になってしまうのでしょうか？ 表現が不足であれば補足しますのでご指導願います。

職場のPCのExcel2003なのですが、例えば「aaa.xls」というファイルをダブルクリックして起動させようとすると、最初はタイトルバーには「Microsoft Excel - aaa」と表示されていますが、途中から「Microsoft Excel - aaa1」と数字が付加され別のファイル名に化けてしまいます。当然、そのまま保存すると、もとの「aaa.xls」のほかに「aaa1.xls」というファイルができてしまうため、困っております。 　また、デスクトップ上にあるExcelファイルを開こうとすると、「c:\Documents.xlsが見つかりません。ファイル名およびファイルの保存場所が正しいことを確認してください・・・」、「and.xlsが見つかりません。ファイル名およびファイルの保存場所が正しいことを確認してください・・・、」、「(デスクトップ上のファイル).xlsが見つかりません。ファイル名およびファイルの保存場所が正しいことを確認してください」という3回のエラーの後に上記の数字がくっついて起動するという問題も同時に起こっています。（フォルダー名+ファイル名が長くなっている場合に発生しているような感じです） 　職場のPCは本体のみ設置のためリカバリーCDなどは無く再インストールは不可能です。またそのために修理扱いで出すと業務に支障をきたすのでなんとかできればと考えております。いろいろ調べて設定なども見てみましたが、さっぱり原因が分かりません。分かる方がいらっしゃいましたらご教授いただけると助かります。

「入力シート」を作成し、日々その日の売上日報を入力しています。 今は日々名前をつけて保存しているのですが、 「入力シート」の横に「1日」「2日」「3日」・・・と1か月分のシートを作成し、「入力シート」内で入力した日付に対応したシートに 日々コピーする事は出来ないでしょうか？ マクロを使ってみたのですが、初心者の為、せいぜい「入力シート」を別のシートにコピー出来ただけで、 日付に対応したシートにコピーする事ができません。 どのようにすればよいでしょうか？ 教えてください。

ExcelVBAで、新しいブックを開き、そのページ設定をしたく、以下のような記述をしたのですが、余白の値が変わりません。 Private Sub Workbook_Open() Workbooks.Add With ActiveSheet.PageSetup .TopMargin = Application.CentimetersToPoints(1.7) .BottomMargin = Application.CentimetersToPoints(1.7) .LeftMargin = Application.CentimetersToPoints(0.9) .RightMargin = Application.CentimetersToPoints(1.1) .HeaderMargin = Application.CentimetersToPoints(1.3) .FooterMargin = Application.CentimetersToPoints(1.3) End With （以下省略） Workbooks.Addを記述せず、新しいをブックを開かなければ、思い通りの動作をします。 外部ファイルを読み込んで、帳票を作るVBAなので、起動時に新しいブックを開きページ設定をしたいのですが、Workbook_Open()で、このような使い方は出来ないのでしょうか？ よろしくお願いします。 尚、会社のLANからgooの閲覧が規制されており、返事が遅れるかもしれません。ご理解の程、お願いします。

VBA初心者です。環境はWindowsXP,Excel2003です。 よろしくお願い致します。 １～３のシートの全てのセルを読み込んで、背景色が赤色のセルの文字をシート４にコピペしたいのです。 このとき、赤色になるセルの列は必ずＦ～ＡＢまで結合されています。 替わるのは何行目かという行数のみです。 （結合セルは、最初のＨ列と見なせば良いのであれば気にしないで下さい。） さらに、赤色のセルをコピペする際に、 赤色のセルから上に上がって、 最初の空白のあるセルの下３行も一緒にコピペして シート４に連れて行きたいのです。 ほとんどのセルは文字と数字で埋まっていますので、 空白セルを条件にすると組み易いかと考えました。 【シート４】は下記のようになる予定です。 　ＡＢＣＤＥＦＧＨＩＪＫＬＭＮＯＰＱＲＳＴＵ １～背景色が赤かったシート１のセル～～～～～ ２～を上に行って最初の空白のあったセルの～～ ３～下３行の丸々コピペ～～～～～～～～～～～ ４～～背景色が赤かったシート１のセル内容～～ ５～背景色が赤かったシート２のセル～～～～～ ６～を上に行って最初の空白のあったセルの～～ ７～下３行の丸々コピペ～～～～～～～～～～～ ８～～背景色が赤かったシート２のセル内容～～ ９～背景色が赤かったシート１のセル～～～～～ 10～を上に行って最初の空白のあったセルの～～ 11～下３行の丸々コピペ～～～～～～～～～～～ 12～～背景色が赤かったシート１のセル内容～～ カナリの初心者なため、組まれたものは読めるのですが、 最初から組む事がなかなか出来ません。 お手数をおかけしますが、 どなたか分かる方がいらっしゃったらお願い致します。

ExcelVBAで、新しいブックを開き、そのページ設定をしたく、以下のような記述をしたのですが、余白の値が変わりません。 Private Sub Workbook_Open() Workbooks.Add With ActiveSheet.PageSetup .TopMargin = Application.CentimetersToPoints(1.7) .BottomMargin = Application.CentimetersToPoints(1.7) .LeftMargin = Application.CentimetersToPoints(0.9) .RightMargin = Application.CentimetersToPoints(1.1) .HeaderMargin = Application.CentimetersToPoints(1.3) .FooterMargin = Application.CentimetersToPoints(1.3) End With （以下省略） Workbooks.Addを記述せず、新しいをブックを開かなければ、思い通りの動作をします。 外部ファイルを読み込んで、帳票を作るVBAなので、起動時に新しいブックを開きページ設定をしたいのですが、Workbook_Open()で、このような使い方は出来ないのでしょうか？ よろしくお願いします。 尚、会社のLANからgooの閲覧が規制されており、返事が遅れるかもしれません。ご理解の程、お願いします。

「入力シート」を作成し、日々その日の売上日報を入力しています。 今は日々名前をつけて保存しているのですが、 「入力シート」の横に「1日」「2日」「3日」・・・と1か月分のシートを作成し、「入力シート」内で入力した日付に対応したシートに 日々コピーする事は出来ないでしょうか？ マクロを使ってみたのですが、初心者の為、せいぜい「入力シート」を別のシートにコピー出来ただけで、 日付に対応したシートにコピーする事ができません。 どのようにすればよいでしょうか？ 教えてください。

毎日下記迷惑メールが発信アドレスを変えてくるんですがなんとか防止できないでしょうか？ タイトルは文字化けしているし毎回フリーアドレスを取得しているみたですし・・・・・ どこかに通報などできないのでしょうか？ 私のプロバイダーはニフティです。よろしくお願いします。 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー よろしくお願い致します 男性の方はこの文章を最後まで読んでくだされば、すぐに理解してくれると思います。 私はとあるサイトの運営者です。 今回このようなメールを送りつけて大変不躾な事だと反省をしておりますが、このような事をしてで も聞いて欲しいお話があるのです。 初めにいっておきますが、私「出会い系サイトに登録していて、私と出会うと、会ってくれるだけで お金を渡します」なんて言うような事は一切ありません。 もし、出会うだけで、何もしないでただお金を貰うだけ・・・そんな事が本当に存在するのならば、す ごい事ですよね。私もやってみたい位です。 そんなうまい話は全くのデタラメです。まずありえません。 しかし、男性が稼ぐ方法がないかと言われれば、そうではありません。 女性がお金を支払うシステムがない訳ではないんです。 出会うだけでお金を貰うというシステムがないだけなんです。 つまり、簡単に言いますと、男性の方が、出会う女性に何をしてあげれるかで、報酬金額が決まると いう事なんです。 そして、その金額設定するのも男性自身というのが私のサイトの大きなメリットです。 すごくわかりづらいですよね。すみません。 わかりやすく説明しますね。 例えば、男性は登録すると、まず初めに自分の報酬金額を決めます。 〈ex.〉 kiss　→　　　　\10000 一日デート　→　\20000 SEX　→　　　　 \50000 このような金額を設定したとしましょう。 女性は男性のプロフィールと、この設定した金額で男性を選びます。 そして、実際にアポイントメントを取り、出会い、男性がしてあげた事によってあらかじめ決められ た報酬を貰うという事になるのです。 やはり、直接女性とのやりとりでお金の話をするのは非常に気がひけると思います。 男性会員様よりのお問い合わせで一番多かったご相談が、お金の問題でした。 ・女性にお金の話をして嫌われないだろうか ・お金は欲しいんだけど、どう切り出せばいいのかわからない ・会う前に貰える金額をあらかじめハッキリさせておきたい 私のサイトではそのような男性の声を頼りに立ち上げたサイトですので、気兼ねなく自分のお値打ち 設定して頂けると思います。 もちろん、女性は報酬を前提にお話をしているので、お金の話を直接する事もありません。 私のサイト内では、女性には身分証明書と収入を証明できるものの二点から、本人確認及び収入の最 低基準確保を徹底しています。 ですので、支払いのできない女性は私のサイトにはいないという事です。 これも私のサイトならではの大きな特徴になります。 サイトのシステムをわかって頂けたでしょうか？ 一つだけ、言い訳をさせてもらえるのならば、当初では男性会員様の方が多いとの見込みだったので すが、あまりにも女性会員様の登録が増えてしまい、このままでは女性会員様からのクレームが来る のではないかと恐れての本メールになったのです。 大変申し訳ありません。 ですが、先ほどお話したこのシステムで、男性会員様が損をする事はないと思っています。 一度試して実感してもらう事が、一番わかりやすいと思います。 http://melkko.net/********** Yahoo様等のフリーメールでも参加できますので、一度お試しください。 （プロフィールを書いて金額設定しておくだけもＯＫです） 長々と申し訳ありませんでした。 黒崎　友希 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 以上

キーボードでシフトキーを押しながら８の数字を押すと普通なら ( が出るじゃないですか？ でも何故か＊マークが出てしまいます。 他にもキーボード上の 「 マークを押したら画面には 」 マークが出てしまいます。なぜかキーボード上のマークと画面に表示されるマークが違うんです。直し方もまったく分からず困っております。 それ以外にも、「カナ/かな」を押しているのにキーボードが反応してくれません。説明が下手すぎてかなり分かりにくいかと思うのですが、どうしたらよいのか教えてください。

windows2000のパソコンに不具合が生じ、パソコンメーカーのサポートセンターに問い合わせたところ「2000を アンインストールしてwindowsXPをインストールした方が良い」との事でした。 起動時にブルーバックのエラーメッセージになりますが、幸いセイフティモードで起動可能です。 windowsXPのソフトを入手しましたが、どのような手順で進めれば良いのでしょうか？ ご教授のほど、宜しくお願いします。

職場でPowerpointを使ってプレゼン資料を作っていますが、自宅のPCにはパワーポイントがありません。Viewerはダウンロードしていて見ることはできるのですが、編集作業をしたいんです。GoogleがらStarsuiteをダウンロードして、使ってみたのですが、CD-ROMから読み込んだPPTのファイルが読み取り専用となって編集できません。また、googleドキュメントもダウンロードしてみましたが、こちらはそもそもどうやったら既存のファイルを読み込めるのか分かりません。 とにかくお金をかけないで、職場で作ったPPTのファイルを編集するための良いお知恵があったらよろしくお願いします。

Excel2000を使用しています。 あるExcelのデータは、別のExcelのデータを参照しに行っている のですが、その参照先のファイル名を管理上の都合で変更しました。 その後、参照する関数も、全て新しいファイル名に直したのですが、 そのExcelを開くとき、「ブックにはほかのファイルへの自動リンク が設定されています～」で「はい」を選ぶと、ファイルを参照する ウインドウが表示され、そこには以前のファイル名がデフォルト表示 されています。 これはどうすれば直るのでしょうか？

エクセルで作成した表の中に、別表からの項目や数値を関数で反映させていくような場合の質問です。 場合によって表中の行数が変わってくる場合に、常に最後の行に決まった値を反映させるには、 どうしたらいいでしょうか(使える関数はあるでしょうか) 例) 売上表作成時、A列に品物を入力していき、品物が何個あっても(A列が何行になっても) 最後の行に『消費税』の項目を自動的に出したい場合 説明がわかりにくいかもしれませんが、よろしくお願いします。

以前も同じような質問をしたものです 使っているPCはVAIO VGN-E50B（Windows XP) DeepBurnerで書かれているドライブという項目には SONY DVD RW DW-U55A 2.5b と記載されています 状況 KNOPPIXでknoppix_v5.1.1CD_2007010420070122+IPAFont_AC20070123.iso というファイルをクリック→保存→マイドキュメントに保存 ISOファイルというものが出来てます CD-RW(700MB)を入れてDeepBurner起動→イメージファイルでISOデータ選択 →ISO書き込みクリック そうすると書き込み失敗となってしまいCDが出てきてしまう状態です CD Manipulatorをダウンロード後、起動→ISOの挿入→ISOデータ選択→CDへ書き込みをすると、先ほどまでエラー文がリードイン書き込み中にエラーなど出ていたのですが、 今は、空CDを入れて書き込みを押しても 「ブランクメディアをセットしてください」としか出ません このPC自体が書き込みに対応出来ていないのか、それともISOファイルがきちんと保存できていないのか… 自分の力でKNOPPIXをCDに焼きたいのですがうまくいかない状態です 解決方法があれば教えてください よろしくお願いいたします

以前も同じような質問をしたものです 使っているPCはVAIO VGN-E50B（Windows XP) DeepBurnerで書かれているドライブという項目には SONY DVD RW DW-U55A 2.5b と記載されています 状況 KNOPPIXでknoppix_v5.1.1CD_2007010420070122+IPAFont_AC20070123.iso というファイルをクリック→保存→マイドキュメントに保存 ISOファイルというものが出来てます CD-RW(700MB)を入れてDeepBurner起動→イメージファイルでISOデータ選択 →ISO書き込みクリック そうすると書き込み失敗となってしまいCDが出てきてしまう状態です CD Manipulatorをダウンロード後、起動→ISOの挿入→ISOデータ選択→CDへ書き込みをすると、先ほどまでエラー文がリードイン書き込み中にエラーなど出ていたのですが、 今は、空CDを入れて書き込みを押しても 「ブランクメディアをセットしてください」としか出ません このPC自体が書き込みに対応出来ていないのか、それともISOファイルがきちんと保存できていないのか… 自分の力でKNOPPIXをCDに焼きたいのですがうまくいかない状態です 解決方法があれば教えてください よろしくお願いいたします

いつもお世話になります。 今回の『壁』は”変数”です。 変数の中に更に変数を持たせることはできますか？ 何をしたいかと言いますと… dim mon1 as string dim mon2 as string dim mon3 as string dim mon4 as string dim mon5 as string dim tue1 as string dim tue2 as string …というように月曜から日曜までの頭3文字プラス1～5の組み合わせの変数を作りたいのですが、 この調子で作っていくと35コになってしまいます。 そこで、曜日の頭3文字より後ろは決まって1～5のため、 dim i as integer for i = 1 to 5 next i …と組み合わせられないかと思ったのです。 どなたか知恵をお貸しください。 よろしくお願いします。

A列には　　　　　　B列には 2007/10/1　　　　　5 2007/10/2　　　　　3 2007/10/3　　　　　4 2007/10/4　　　　　6 2007/10/5　　　　　5 ・ ・ ・ A列は昇順に日付が入っていて B列にはランダムに数字が入っています。 やりたいことは たとえばB1セルの「５」を基準値として 次に「５」がくるのは何日後かを知りたいです。 4日後になると思うのですが どうやったら４と数字を求めるられるのでしょうか？ よろしくお願いします。

下記コードのように、　「　E　列　」　だけに実行するのではなく、 「　実行前　」　に、手動にて、好みの任意のセル１つに　　「　関数　」　を貼り付けます。 そしてマクロを実行し、　下記　「　実行後　」　のようにするには、どのようなコードになりますでしょうか？ 下記のような変数を組み入れるのだと思いますが、うまく出来ません。 ただ、先頭の　「　行番号　（　変動しますが、例では60　）　」　は、　手動にて貼り付けますので事前に解かっているとします。 また、　「　オートフィルタ　」　後に、使用する予定です。 何卒、よろしくお願い致します。 ------------------ Sub test() Range("E60").Select ActiveCell.FormulaR1C1 = "=RC[2]" Selection.AutoFill Destination:=Range("E60", Range("C65536").End(xlUp).Offset(0, 2)), Type:=xlFillDefault End Sub ------------------ Dim r As Range, base As Range Dim x, y Dim i Set r = Selection Set base = Selection.Cells(1, 1) x = r.Columns.Count y = r.Rows.Count ---実行前（オートフィルタ後）------------------ C列　　　　　　　　　　　　E列　 ・　　　　　　　　　　　　　　・　 ・　　　　　　　　　　　　　　・ 2007/10/13　　　　　　　=G60　　　 2007/10/13 2007/10/13 2007/10/13 2007/10/13 2007/10/14 2007/10/14 --実行後------------------- C列　　　　　　　　　　　　E列　 ・　　　　　　　　　　　　　　・　 ・　　　　　　　　　　　　　　・ 2007/10/13　　　　　　　=G60　　　 2007/10/13　　　　　　　=G60 2007/10/13　　　　　　　=G60 2007/10/13　　　　　　　=G60 2007/10/13　　　　　　　=G60 2007/10/14　　　　　　　=G60 2007/10/14　　　　　　　=G60

はじめまして　エクセルのマクロ初心者です。 ツール→マクロ→新しいマクロの記録にて 開いているシートをA1～V68まで（すべての範囲でもOKです）をコピーし、別の貼り付け用シートに貼付、3つのタブを印刷して閉じ、開いているシートを表示する。という内容のマクロを登録しました。 台紙で以上のマクロを登録し、台紙を複製しました。 マクロを実行すると複製されたシートのA1～V68までではなく、台紙のA1～V68までが印刷されて困っています。 どうすれば解決するでしょうか？？？詳しい方おしえてください。 尚、下記に記録されたものを載せておきますので、訂正部分など教えてもらえたら助かります。 （マクロの記録の上部を訂正すると良いような気はするのですが…。初心者なのもので範囲の指定の仕方がわるいのでしょうか？？？） よろしくお願いします。 Sub マクロ名() ' ' マクロ名 Macro ' マクロ記録日 : 2007/10/14 ユーザー名 : ？？？ ' ' Application.Run "hozon1.初期" Range("A1:V68").Select Selection.Copy ChDir "C:\Documents and Settings\Administrator\デスクトップ\日報、点呼簿" Workbooks.Open Filename:= _ "C:\Documents and Settings\Administrator\デスクトップ\日報、点呼簿\平日,日曜、祭日点呼簿.xls" Cells.Select ActiveSheet.Buttons.Add(509.25, 1.5, 72.75, 12.75).Select ActiveSheet.Paste Sheets("大型1").Select Application.CutCopyMode = False ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Sheets("大型2").Select ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Sheets("小型1").Select ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True ActiveWindow.Close ActiveWindow.SmallScroll Down:=-51 Range("J3").Select End Sub

エクセル２００３で、下記のようなプログラムを作っています。 (1,1)の列に数字が入っている所まで、(1,2)の列にＶＬＯＯＫＵＰで値を引いてくる。 Cells(1,2).Select Selection.End(xlDown).Select L = Selection.Row ですがこのプログラムでは、(1,2)列の一番下の列番号を取得してしまいます（Cell(65536,2)です）。(1,1)列の最後の数字までを取得できるプログラムにするにはどうしたらいいでしょうか。 図解しますと、 　　（列）１　２　 （行） 　１　　　２　Ａ 　２　　　５　Ｆ 　３　　　４　Ｈ 　４　　　７　Ｔ 　５　　　９　Ｙ 　６ 　７　　　　　 のような具合です。数字や値に規則性はありません。自分なりにやってみたのですが、どうしても上手くいかないので、ぜひ教えて下さい。よろしくお願いします。