Excel2000です。

エクセルの1つのブックの中に複数のシートがあるときに、
エクセルの1つのウィンドウの中に、その同一のブックの複数のシートを同時に表示させたいのですが、
どうすればよいでしょうか。
(?_?)

もちろん、エクセルの1つのウィンドウの中に、同一のブックを二つ以上表示できれば、上記のことは可能ですが、
そのやり方もわかりません。

A 回答 (3件)

Excelのヘルプより



複数のシートまたはブックを並べて表示する

表示するブックを開きます。
作業中のブックの複数のシートを表示するには、[ウィンドウ] メニューの [新しいウィンドウを開く] をクリックします。新しいウィンドウで、表示するシートのシート見出しをクリックします。表示する各シートについてこの操作を繰り返します。

[ウィンドウ] メニューの [整列] をクリックします。


[整列方法] のオプションをクリックします。
作業中のブックのウィンドウだけを整列して表示するには、[作業中のブックのウィンドウを整列する] チェック ボックスをオンにします
    • good
    • 0
この回答へのお礼

[新しいウィンドウを開く] なんですね。ありがとうございました。

お礼日時:2001/11/29 22:14

以下の方法でシートの一部を表示させることも可能です。


一部しか表示できないかわりに、印刷にも対応します。

ツール→ユーザー設定→コマンド→ツール
の中にあるカメラのボタンをツールバーにドラッグして使えるようにします。

別シートに表示させたい範囲を選択してカメラボタンを押し、表示したい場所でマウスクリック。

以上でExcel上の別の場所にある範囲を並べられます。
    • good
    • 0
この回答へのお礼

カメラって知りませんでした。いいことを聞きました。
( ̄ー ̄)ニヤリッ

お礼日時:2001/11/29 22:25

はじめまして。


ご質問の意味を間違えていたらごめんなさい。

1.「ウィンドウ」メニューから、「新しいウィンドウを開く」を選択。
2.同じく「ウィンドウ」メニューから、「整列」を選択。
3.「左右に整列」、「上下に整列」、などを選択してOK。

これで、同一ブック内のシートを複数表示させることができます。
    • good
    • 0
この回答へのお礼

>ご質問の意味を間違えていたらごめんなさい。

だいじょうぶです。間違えていません。

おっしゃるとおりにしたらできました。(●^o^●)

お礼日時:2001/11/29 22:13

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qエクセル プルダウンの作り方

お世話になります。
エクセルでプルダウンの作り方を教えていただけませんでしょうか?
住所を▼のボタンでクリックしたら【北海道,青森,秋田,岩手・・・】などの選択ができるようにしたいのです。
宜しくお願いします。

Aベストアンサー

メニューから「データ」、「入力規則」、「設定」で「入力値の種類」を「リスト」を選択します。
そうすると「元の値」という表示がでますので、そこで前もって作っておいたリストの範囲を指定します。
多くないのでしたら、そのままそこにカンマで区切って入力しても出来ます。

Qエクセルでブックを3つ同時に開いて、3つのブックの表示倍率を同時に40%にする事はできますか(?_?)

こんにちは、みなさん!!

【質問】エクセルで、ブックを3つ同時開きます。この3つの
ブックの表示倍率を、同時に40%(任意倍率)にする事は
できますか(?_?)

ご存知の方いらっしゃいましたらよろしくお願いします。

Aベストアンサー

補足要求です
最初に一連の質問を拝見して気になった点を述べます
エクセルでは「ブックを3つ同時に開いて」は意味がないです。操作上は3つまとめて起動したのかもしれませんが、ブックは個々に独立しています。他の回答者さまもこのキーワードに困惑されているようですね。

従って本質問は「同時に開いている3つのブックの表示倍率をいっぺんに40%にすることはできるか?」という意味になりますが、そこで質問です。

それぞれのブックは3枚のシートから構成されているようですね。ズーム倍率はシート毎に設定が必要です。3シート×3ブック=9シートの倍率を40%にしたいのですか?

また3つのブック以外にブックが開いている場合はどうすればよいですか? (開いている全ブックの全シートを40%にするのであれば簡単です。でも指定した3ブックの、特定のシートのみを変倍するのであれば、ブック名、シート名などを補足していただかないとマクロは書けません)

Qエクセルでプルダウンメニューの作り方

  エクセルの画面で、よく三角形を逆さまにした形をクリックするといくつかメニューが出てき、どれかを選べるようになっていますが、その作り方を教えてください。
 会社で人事を担当していますが、三角形(プルダウンボタン)をクリックすると社員氏名一覧が表示され、そこから選択できるようにしたいのです。
 しばらく自力でいろいろやってみましたが、さっぱり見当がつかず、どうやればいいのか分かりませんでした。よろしくお願いします。

Aベストアンサー

こんばんは!
当方使用のExcel2003での一例です!

↓の画像のようにSheet2に名簿表を作成しておきます。
画像ではSheet2のA2セル以降を範囲指定 → 名前ボックスに仮に「名簿」と入力しOK
これで範囲指定したセルが「名簿」と名前定義されましたので、

Sheet1のリスト表示させたいセルを範囲指定 → メニュー → データ → 入力規則
→ リスト → 「元の値」の欄に
=名簿
としてOK

これでSheet1のセルをアクティブにすると右側に下向き▼が表示されますので、そこをクリック!
これで希望に近い形にならないでしょうか?
Excel2007の場合は↓のURLが参考になるかもしれません。

http://www.eurus.dti.ne.jp/~yoneyama/Excel2007/excel2007-ny_kis2.html

尚、同一Sheetに「名簿表」を作成する場合は名前定義する必要はなくて
「元の値」の右側の四角をクリックし、リスト表示したいセルをそのまま範囲指定すればOKです。

以上、お役に立てば良いのですが・・・m(_ _)m

こんばんは!
当方使用のExcel2003での一例です!

↓の画像のようにSheet2に名簿表を作成しておきます。
画像ではSheet2のA2セル以降を範囲指定 → 名前ボックスに仮に「名簿」と入力しOK
これで範囲指定したセルが「名簿」と名前定義されましたので、

Sheet1のリスト表示させたいセルを範囲指定 → メニュー → データ → 入力規則
→ リスト → 「元の値」の欄に
=名簿
としてOK

これでSheet1のセルをアクティブにすると右側に下向き▼が表示されますので、そこをクリック!
これで希望に近い形にならない...続きを読む

QVBAマスターブックの作成につきまして 質問致します 複数のブックに複数のシートが有ります 保存ファ

VBAマスターブックの作成につきまして
質問致します
複数のブックに複数のシートが有ります
保存ファイルは1つにまとめてあります

マスターブック
セルB5にブック名
セルD5にシート名
を入力して該当するブックのシートを
開くようなマクロを作成したいのですが
上手く行きません

マクロ初心者の為
記入内容をわかりやすく教えて頂けないでしょうか
よろしくお願いします。

Aベストアンサー

以下のマクロを標準モジュールへ登録してください。
----------------------------
Public Sub 検索処理()
Dim sh As Worksheet
Dim dir_name As String
Dim book_name As String
Dim sheet_name As String
Dim book_path As String
Set sh = Worksheets("検索")
dir_name = sh.Range("B3").Value
book_name = sh.Range("B5").Value
sheet_name = sh.Range("D5").Value
book_path = dir_name & "\" & book_name
If dir(dir_name, vbDirectory) = "" Then
MsgBox (dir_name & "は存在しません。")
Exit Sub
End If
If dir(book_path) = "" Then
MsgBox (book_name & "は存在しません。")
Exit Sub
End If
Workbooks.Open book_path
Workbooks(book_name).Activate
If ExistsWorkSheet(sheet_name) = False Then
MsgBox (book_name & "中に" & sheet_name & "は存在しません")
Workbooks(book_name).Close
Exit Sub
End If
Worksheets(sheet_name).Activate
Range("A1").Activate
MsgBox ("検索完了")
End Sub

'ワークシートの存在チェック
Public Function ExistsWorkSheet(ByVal sheetName As String) As Boolean
Dim ws As Worksheet
ExistsWorkSheet = False
For Each ws In Worksheets
If UCase(ws.name) = UCase(sheetName) Then
ExistsWorkSheet = True
Exit Function
End If
Next ws
End Function
------------------------------------
添付の図のようにセルに検索条件が設定されていることが前提です。
B3:フォルダ名
B5:ファイル名(ブック名)
D5:シート名

以下のマクロを標準モジュールへ登録してください。
----------------------------
Public Sub 検索処理()
Dim sh As Worksheet
Dim dir_name As String
Dim book_name As String
Dim sheet_name As String
Dim book_path As String
Set sh = Worksheets("検索")
dir_name = sh.Range("B3").Value
book_name = sh.Range("B5").Value
sheet_name = sh.Range("D5").Value
book_path = dir_name & "\" & book_name
If dir(dir_name, vbDirectory) = "" Then
Msg...続きを読む

Qエクセル(Excel) 納品書の作り方【画像修正版

昨日http://oshiete.goo.ne.jp/qa/7348426.htmlで質問させていただき、詳しくご回答いただき少し進んだのですが、状況が変わったので改めて質問させていただきます。

■エクセル(Excel)で納品書の作成をしています。
シート1に納品書、シート2に商品マスタ(一覧)を作っていて、シート2の一覧を反映させて
納品書に番号を打ち込むだけで、商品名・単価までが出るシステムを作りたいのですが、
昨日のご回答の中の「VLOOKUP」?を入れて、自分なりにマス目の数字を変えてやってみたのですが
反映されずN/?のようなエラーになってしまいます。

※画像が見にくかったのでシート<CENTER></CENTER>だけにしました。

1、上記のように、シート2との関連付けの係数を、写真の場合の数字で教えてください。

2、合計と、合計から20%を引いた数値を割り出す関数も、写真の数字で御願いします。

宜しくご教授お願い致します。

Aベストアンサー

こんばんは!
前回投稿した者です。

当方もかなり古い(人間も古い!なぁ~んちゃって!)Excel2003を使用しています。
↓の画像のようにSheet2にデータを作成しておきます。

#N/A というエラーは、「検索値」がない!ということですので
お示しの画像のB列にSheet2のA列にないデータを入力するとそういったエラーが表示されます。

画像のセル配置ですと
C4セルに
=IF($B4="","",VLOOKUP($B4,Sheet2!$A:$C,COLUMN(B1),0))
(「$」マークの位置に気を付けてください)
という数式を入れD4セルまでオートフィルでコピー!
そのまま最後の24行目までコピーしておきます。

F4セルには
=IF(COUNTBLANK(B4:E4),"",D4*E4)
という数式を入れ、F24までオートフィルでコピー!

これでB列に商品番号を入力すればSheet2のデータが反映され、
E列に数量を入力でF列に金額が表示されると思います。

最後に合計金額のF26セルは
=IF(COUNT(F4:F24),SUM(F4:F24),"")
手数料のF27セルは
=IF(F26="","",F26*0.2)

これで何とか形にならないでしょうか?

※ 振込金額の欄は不明ですので手を付けていません。

参考になりますかね?m(_ _)m

こんばんは!
前回投稿した者です。

当方もかなり古い(人間も古い!なぁ~んちゃって!)Excel2003を使用しています。
↓の画像のようにSheet2にデータを作成しておきます。

#N/A というエラーは、「検索値」がない!ということですので
お示しの画像のB列にSheet2のA列にないデータを入力するとそういったエラーが表示されます。

画像のセル配置ですと
C4セルに
=IF($B4="","",VLOOKUP($B4,Sheet2!$A:$C,COLUMN(B1),0))
(「$」マークの位置に気を付けてください)
という数式を入れD4セルまでオートフィルで...続きを読む

Qエクセルで3つのブック(中は3つのシート)を同時に開いた時に常に2番目のシートが開いているようにするには?

こんにちは、みなさん!!

【質問】エクセルの3つのブックがあります。中身は3つのシート
があり、全て同じフォームのシートです。

そこで、同時に3つのブックがを開いた時に、ブックの中の1つめのシートではなく、2つ目のシートが常に表示されるようにする事はで
きますか?

ご存知の方いらっしゃいましたらよろしくお願いします。

Aベストアンサー

3つのブックのそれぞれに対して以下のことをしてください

(1)ブックを開き、ALT+F11でVBE画面を開く
(2)画面左上のVBAProjectエクスプローラのThisWorkBookを右クリック→コードの表示
(3)以下のマクロを右側に開いた画面に貼り付ける
Private Sub Workbook_Open()
Worksheets("Sheet2").Activate
End Sub
(4)2行目のシート名を表示したい実際のシート名に書き換える
(5)シート画面に戻り、Bookを保存する

これで次にBookを開くと二番目のシートが最初に表示されます

Qエクセル(Excel) 納品書の作り方【改めて】

昨日http://oshiete.goo.ne.jp/qa/7348426.htmlで質問させていただき、詳しくご回答いただき少し進んだのですが、状況が変わったので改めて質問させていただきます。

■エクセル(Excel)で納品書の作成をしています。
シート1に納品書、シート2に商品マスタ(一覧)を作っていて、シート2の一覧を反映させて
納品書に番号を打ち込むだけで、商品名・単価までが出るシステムを作りたいのですが、
昨日のご回答の中の「VLOOKUP」?を入れて、自分なりにマス目の数字を変えてやってみたのですが
反映されずN/?のようなエラーになってしまいます。

※画像が貼り付けてあります。商品名は1番以外伏せさせていただいています。
くっつけてありますが、左側がシート1・右側がシート2です。

1、上記のように、シート2との関連付けの係数を、写真の場合の数字で教えてください。

2、合計と、合計から20%を引いた数値を割り出す関数も、写真の数字で御願いします。

宜しくご教授お願い致します。

Aベストアンサー

画像がいまいちよく見えないのですが、納品書の項目は左から、No、商品番号、商品名、単価、数量、金額でいいのでしょうか(名前は多少違っていても意味があっていればもんだいないです)

でしたら、
C1セルに=IF(ISBLANK(B2),"",VLOOKUP(B2,Sheet2!$A$2:$C$200,2,FALSE))
D1セルに=IF(ISBLANK(B2),"",VLOOKUP(B2,Sheet2!$A$2:$C$200,3,FALSE))
E1セルは空白で
F1セルに=IF(D2="","",D2*E2)
といれて、C1からF1までをコピーしてその下の行にタテに貼り付ければ出来ますよ。
おそらくエラーが出たのは、コピーしたときにVLOOKUP関数の最初のセルの指定がずれてしまっているのでは無いかと思いますよ。     

Q【エクセル】複数シートの同一セルの内容を別のシートに自動反映させたい

エクセルについて教えてください。エクセル初心者なので、説明がうまくできないのですが、やりたいことを汲み取っていただけると助かります。

現在複数シートのシートの同一セル上に数字が記入されています。
新たに別シートを作成し、その表に数字が自動入力されるように
したいのですが、何か方法はありますでしょうか。
例)(1)シート1~12のA10セルに4月-3月までの支出合計が
   記入されている。
  (2)別シートに縦罫4月-3月、横罫支出合計とした表を作成。
  この表に月ごとの支出合計が自動的に反映されるように
  したいのですが、今はセル一つずつに"=シート1のセルA10"を
  入力しています。
  この方法以外に便利な方法があったら教えてください。

  説明下手で申し訳ございませんが、宜しくお願い致します。

Aベストアンサー

>>=INDIRECT("支出"&A2&"!A10")
上記の計算式でやってみたのですが、#REF!となってしまいます。

A2セルに「4月」などの月がシート名と同じフォント(数字が半角で月が全角など)で入力されているのでしょうか?

念のため、「=INDIRECT("支出4月!A10")」と数式を使わずに文字列でそのまま参照したときに正しい値が返るか調べてみてください。

Qエクセル2007でプルダウンで選んだものに反応

Excel2007でプルダウンで選んだものに反応して隣のセルが自動入力される方法(エクセル2007)
A1をプルダウンで「猫」「犬」から選べるようにし、「猫」を選んだ場合B1に自動に「111」が、「犬」を選んだ場合B1に自動に「222」と入力されるようにしたいです。
ご教授の程、宜しくお願いします。

Aベストアンサー

VLOOKUP関数での方法です。
(1)別シートに入力文字列と対応コード表を作成。(仮にSheet2のA:B列範囲で順不同)
(2)B1に=IF(COUNTIF(Sheet2!A:A,A1),VLOOKUP(A1,Sheet2!A:B,2FALSE),"")を設定
   入力文字列が存在しない場合は空白としています。

Q複数エクセルブックのそれぞれシートごとを1つに合体

同項目で、それぞれ入力内容の違う複数のエクセルファイル「A店」「B店」「C店」「D店」・・・と複数店分あります。
各々のファイル内に、Aマスタ、Bマスタ、Cマスタと3シートあります。(これも同項目で入力内容が違う)
これをAマスタ、Bマスタ、Cマスタというそれぞれのファイルに分けて、全店分を1つのシートに合体させたいのですが、かなりのファイル数があるので1つ1つのファイルを開き、コピー&ペーストすると、かなりの時間が必要になります。
マクロを利用した方法はございませんでしょうか?

シートの内容詳細としては、
・各シート1~9行目までは、シートの記入方法の説明がある。
・10行目にヘッダー
・Aマスタ、Bマスタ、Cマスタすべてヘッダーは同じ項目。

そのため、11行目からのデータを、「A店」「B店」「C店」「D店」・・・全店分を合体させ1つのファイルにしたものを作成したいと思っています。
何かいいマクロがございましたら教えていただけますでしょうか。
マクロに関してあまり知識がございませんので、よろしくお願いいたします。

Aベストアンサー

マージ(単純結合)対象ファイル(ブック)とマクロブックは、全て同じフォルダにある。
対象シートの形式も全て同じ。
対象シートは、xFromとxToに連続したシート番号で設定する。
マージ結果は、マクロブックの同じ並びにあるシートに出力。(最初に空きのシートを用意する必要がある)

Option Explicit
Sub MergeBooksEachSheets()
Const xFileSelector = "\*.xls*"
Const xKey_Col = "A"
Const xFrom = 1
Const xTo = 3
Const xNum = xTo - xFrom + 1
Const xHeads = 10
Dim xPath As Variant
Dim xFileName As Variant
Dim xName As Variant
Dim xBook As Workbook
Dim xSheet As Worksheet
Dim xNoData As Boolean
Dim nn As Long
Dim xLast As Long
Dim zLast As Long
'Application.ScreenUpdating = False
Application.DisplayAlerts = False
xNoData = True
Set xBook = ThisWorkbook
xPath = xBook.Path & "\"
xName = xBook.Name
xFileName = Dir(xPath & xFileSelector, vbNormal)
Do Until xFileName = Empty
If (xFileName <> xName) Then
With Workbooks.Open(xPath & xFileName)
If (xNoData) Then
For nn = xFrom To xTo
xBook.Sheets(nn).UsedRange.Clear
Application.CutCopyMode = False
.Sheets(xFrom).Rows("1:" & xHeads).Copy
xBook.Sheets(nn).Range("A1").PasteSpecial Paste:=xlPasteValues '値だけを貼付け
Next
End If
For nn = xFrom To xTo
Application.CutCopyMode = False
Set xSheet = .Sheets(nn)
xLast = xSheet.Cells(Rows.Count, xKey_Col).End(xlUp).Row
xSheet.Rows(xHeads + 1 & ":" & xLast).Copy
zLast = xBook.Sheets(nn).Cells(Rows.Count, xKey_Col).End(xlUp).Row
xBook.Sheets(nn).Range("A" & zLast + 1).PasteSpecial Paste:=xlPasteValues '値だけを貼付け
Next
Application.CutCopyMode = True
.Close
End With
xNoData = False
End If
xFileName = Dir
Loop
If xNoData = True Then
MsgBox ("No Data Found!!")
End If
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End Sub

マージ(単純結合)対象ファイル(ブック)とマクロブックは、全て同じフォルダにある。
対象シートの形式も全て同じ。
対象シートは、xFromとxToに連続したシート番号で設定する。
マージ結果は、マクロブックの同じ並びにあるシートに出力。(最初に空きのシートを用意する必要がある)

Option Explicit
Sub MergeBooksEachSheets()
Const xFileSelector = "\*.xls*"
Const xKey_Col = "A"
Const xFrom = 1
Const xTo = 3
Const xNum = xTo - xFrom + 1
Const xHeads = 10
Dim xPath As Variant
Dim xFileName ...続きを読む


人気Q&Aランキング