エクセルで、オブジェクトの「吹出し」を複数作成しました。tabキーを押すと、次のtabに飛んでくれますが、これを任意の順番に変更することは可能でしょうか。普通に作成すると、新しく作成したものから古いものにさかのぼる順で選択されています。この性質を利用して、選択したい順の逆順で作っていけば良いのですが、すでに相当数を作成しているため、一から作りなおさず選択順だけを変えたいと思っています。よろしくお願いします。

このQ&Aに関連する最新のQ&A

A 回答 (8件)

#4(misatoanna)です。



> このマクロでは、最後のオブジェクト選択状態でマクロを実行すると
> エラーになります。

ごめんなさい。こちらではエラーを再現できません。

> Select Case Odr
>  Case Is = Ttl  'A
>   Nxt = 1
>  Case Else    'B
>   Nxt = Odr + 1
> End Select

この部分ですが、
A)選択したオブジェクトの順番が最前面(順位番号がオブジェクト数と
  一致)なら、次に選択するのは最背面のオブジェクト。
B)それ以外ならひとつ前面のオブジェクト。
という処理です。

こちらでは、モジュールどおりに、最後のオブジェクトを選択した状態で
実行すると最初のオブジェクトに戻り、何回でも循環できるのですが。

エラーが起きたときに VisualBasicEditor を開いてみてください。
どこでエラーが起きて、どのようなメッセージが出ますか?
    • good
    • 0
この回答へのお礼

#4(misatoanna)さん、ご連絡ありがとうございます。
私のやり方が悪かったのか、今度は何週でも循環でき、当初やりたいとイメージしていた通りの結果になりました。辛抱強くお付き合い頂き感謝します。

お礼日時:2009/05/24 18:47

>選択したい最後のオブジェクトが1度で選択され、


>何度実行してもそれ以外のオブジェクトがアクティブになりません。
そのまま、Tabキーを操作してみてください。
TabIndex(実際にはありません)が、1の図形から順にTab移動しないでしょうか?
Tab移動の順番は、シートに貼り付けられた順になります。
従って、Cutして、PasteすることでTab移動順が最後に変更なります。
吹き出し以外に図形がある場合、それらの図形の後に、吹き出しのTab順がくることになります。

>それをテキストボックスの最初の2数字(01~)の順にtabを飛ばして>1つずつ書いてあるコメントを確認していく
で、本当にやりたいことはこれですね。
下記に差し替えてください。

    If stxt = i Then
      MsgBox shp.TextFrame.Characters.Text
'      shpleft = shp.Left
'      shptop = shp.Top
'      shp.Cut
'      ActiveSheet.Paste
'      Selection.ShapeRange.Left = shpleft
'      Selection.ShapeRange.Top = shptop
      Exit For
    End If
    • good
    • 0
この回答へのお礼

xls88さん、マクロ実行できました。メッセージボックスにコメントを表示できるようにして頂いたんですね。この機能はとても重宝します。辛抱強くお付き合い頂きありがとうございました。

お礼日時:2009/05/24 18:56

>テキストボックスの最初の2文字が、


>01から始まる2桁の半角数字で、
>この数字が選択したい順番に昇順になっています。
上記内容を手掛かりに対象オブジェクトを操作します。
従って、今度のマクロはオブジェクトを選択しておく必要がありません。

Sub test3()
  Dim shp As Shape
  Dim shpleft As Double
  Dim shptop As Double
  Dim stxt As String
  Dim i As Long

  Application.ScreenUpdating = False
  For i = 1 To ActiveSheet.Shapes.Count
    For Each shp In ActiveSheet.Shapes
      On Error Resume Next
      stxt = val(Left(shp.TextFrame.Characters.Text, 2))
      On Error GoTo 0
      If stxt = i Then
        shpleft = shp.Left
        shptop = shp.Top
        shp.Cut
        ActiveSheet.Paste
        Selection.ShapeRange.Left = shpleft
        Selection.ShapeRange.Top = shptop
        Exit For
      End If
    Next shp
  Next i
  Application.ScreenUpdating = True
End Sub
    • good
    • 0
この回答へのお礼

xls88さん、度々ありがとうございます。
今回のマクロを実行すると、選択したい最後のオブジェクトが1度で選択され、何度実行してもそれ以外のオブジェクトがアクティブになりません。やりたいことは、1画面に収まりきらない数の吹出しがシートの中に散らばっていて、それをテキストボックスの最初の2数字(01~)の順にtabを飛ばして1つずつ書いてあるコメントを確認していく、ということです。よろしくお願いします。

お礼日時:2009/05/24 13:31

これも雑ですが、同じシート内で処理するようにしてみました。


Tag移動順に、オブジェクトを選択しておいて、マクロを実行してください。
マクロは大丈夫ですか?
Tag移動順の規則とか何か手掛かりになるものはありますか?
例えば、オブジェクトの左上角がかかっているセル番地に規則性があるとか、もし、あれば教えてください。

Sub test2()
  Dim shp As Object
  Dim shpleft As Double
  Dim shptop As Double
  For Each shp In Selection
    shpleft = shp.Left
    shptop = shp.Top
    shp.Cut
    ActiveSheet.Paste
    Selection.ShapeRange.Left = shpleft
    Selection.ShapeRange.Top = shptop
  Next
End Sub

この回答への補足

短時間に2度もご回答頂きありがとうございます。vbaはあまり詳しくありませんが、ご指定のvbaを実行してみました。
やり方が的を射ていないのか、オブジェクトを選択したい順にshiftを押しながら選択した後、vbaを実行したところ、選択した5つのオブジェクトの最後のものがアクティブになりました。もう一度実行すると、「オブジェクトは、このプロパティまたはメソッドをサポートしていません」というエラーメッセージが表示されました。
なお、オブジェクトの位置に規則性はなく、強いて言えば、吹出し(オブジェクトは全て吹出し)の中テキストボックスの最初の2文字が、01から始まる2桁の半角数字で、この数字が選択したい順番に昇順になっています。

補足日時:2009/05/23 23:57
    • good
    • 0

#2さまのご回答のように、選択順は「上から下。

同じ上位置なら左から右」で、
この順番は一般機能では変えられないのではないでしょうか。

次のようなマクロを記述してみました。

1.オブジェクトの順番を入れ換えるマクロ。
 [Shift]を併用して選択したい順にオブジェクトを選択して実行します。
 オブジェクトの数が多い場合は、数回に分けて操作してもOKです。
 Sub SetOrder()
  Dim shp
  For Each shp In Selection
   shp.ShapeRange.ZOrder msoBringToFront
  Next
 End Sub

2.オブジェクトを順に選択するマクロ
 選択されているオブジェクトの、ひとつ前面にあるオブジェクトを選択します。
 Sub SelectNext()
  Dim Ttl, Odr, Nxt
  Ttl = ActiveSheet.Shapes.Count
  Odr = Selection.ShapeRange.ZOrderPosition
  Select Case Odr
   Case Is = Ttl
    Nxt = 1
   Case Else
    Nxt = Odr + 1
  End Select
  ActiveSheet.Shapes(Nxt).Select
 End Sub

3.[Tab]キーにマクロ(SelectNext)を割当てるマクロ
 実行後、[Tab]キーを押すたびに上記マクロ(SelectNext)が実行されます。
 Sub SetKey()
  Application.OnKey "{Tab}", "SelectNext"
 End Sub

4.[Tab]キーの機能をデフォルトに戻すマクロ。
 Sub ResetKey()
  Application.OnKey "{Tab}"
 End Sub

新規ツールバーにユーザー設定ボタンを幾つか置いて、必要なマクロを登録して
おくとラクですね。
    • good
    • 0
この回答へのお礼

ご返信ありがとうございました。
マクロ1,2を実行し、選択したい順にオブジェクトを選択することができました。もしお時間があればもう一つ教えていただきたいのですが、このマクロでは、最後のオブジェクト選択状態でマクロを実行するとエラーになります。これを、最初のオブジェクトに戻って何回転でも循環できるようにすることはできるでしょうか。よろしくお願いします。

お礼日時:2009/05/24 12:50

試しに大雑把ですが、マクロを組んでみました。


Sheet1のオブジェクトをSheet2に選択順にコピーします。
Tab移動順で、オブジェクトを選択しておいて、マクロを実行してください。
Sheet2に貼り付けられたオブジェクトは
Sheet1のオブジェクトを選択した順番でTab移動します。

Sub test1()
  Dim shp As Object
  Dim saddress As String
  
  Application.ScreenUpdating = False
  For Each shp In Selection
    Worksheets("Sheet1").Select
    saddress = shp.TopLeftCell.Address
    shp.Copy
    Worksheets("Sheet2").Select
    Range(saddress).Select
    ActiveSheet.Paste
  Next
  Application.ScreenUpdating = True
End Sub
    • good
    • 0

当方2003です。


エクセルは得意ではないのですが
どうやら、
上から下へ、同じ上位置なら左から右へ
という順序で移動するようです。
作成した順や、名前は関係ないようですし
タブオーダーのようなプロパティも見つかりません。

任意の移動は無理じゃないでしょうか。
    • good
    • 0
この回答へのお礼

ご返信ありがとうございました。

お礼日時:2009/05/24 00:11

こちらのバージョン2002ではtabで任意の移動設定はできないみたいでした。

他のバージョンではどうなのでしょう
コピーしたり移動したりすると移動の規則性がわかりません
シェイプNOは変更できず、シェイプNO順に移動もしません
単に逆方向移動であれば、「shift」+「tab」で移動するのですが・・・・
    • good
    • 0
この回答へのお礼

ご返信ありがとうございました。

お礼日時:2009/05/24 00:11

このQ&Aに関連する人気のQ&A

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

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

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

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

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

Aベストアンサー

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

QExcelでTabキーを使って入力対象セルに飛びたい

Excel2002を使用して簡単な入力フォームを作成中なのですが、入力し易いようにタブキーが使えないか悩んでます。

例えば下のような表があるとして、
    A    B    C    D    E
1  氏名  山田
2  年月  2000   年    12   月

最初にB1にカレントセルがあって、タブキーを押すとB2に飛んで、またタブキーを押すとD2に飛ぶ・・・、
というように、自分が入力したいセルにタブキーで飛べないかな?と思うのです。

マクロは使わずに何かの設定などで出来るのでしょうか?

マクロを使用する場合は、どんな書き方にすればよいでしょうか?

どうぞ教えてください。m(_ _;m)

Aベストアンサー

セルの保護機能を使っておくと、入力したい(保護していない)セルを[Tab]キーで移動できます。

セルの保護を解除(デフォルトで全部のセルを保護する設定になっています)するには、

[書式]-[セルの書式設定]
「セルの書式設定」ダイアログ
「保護」タブ
「ロック」のチェックを外す

の後、

[ツール]-[保護]-[シートの保護]
でシートの保護を有効にしてください。

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

QMS-WORDで複数行選択してTabを押すと文字が消去されてしまいます

PCの素人です。はじめて質問します。よろしくお願いします。

マイクロソフトワードを利用しています。

以前は、複数行を選択して、Tabキーを押すと、選択した複数行が
全て、数文字、右側(横書きの場合)へ数文字、移動していました。

しかし、何かの弾みで設定をいじってしまい、同じ入力をすると、
選択した行がすべて、消去されてしまう設定になってしまいました。

これをもとに戻すには、どうすればよろしいのでしょうか?

色々、やってみましたが、うまくいきません。
仕事等で文字原稿を打つ作業が多いので、かなり困っています。
解決策が分かる方は、ぜひ、教えてください。
よろしくお願いします。

Aベストアンサー

「ツール」→「オートコレクトのオプション」→「入力オートフォーマット」タブを開いて、

「入力中自動で行う処理」欄の「Tab/Space/BackSpace キーでインデントとタブの設定を変更する」のチェックが外れていませんか?
(Word 2003 で見ています。)

こちらからは、質問者のPCの画面を見ることができませんので、少なくとも使用しているパソコンのOSとソフトのバージョンをご記入下さい。

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エクセルでのオブジェクト選択について

エクセル2003で、線を引いてその後、調整しようと該当の線を選択すると、どうも始点付近に画面が飛びますが、これを終点付近とか、選択クリックした位置で画面が飛ばないようにはならないのでしょうか?
拡大して調整しようとすると、画面が飛んで、スクロールで戻って調整、また・・・と繰り返すのが不便なものですから。
宜しくお願いします。

Aベストアンサー

こんにちは。

>マクロは使わせて頂きましたが、結局ズームはできても線を選択したら終点が画面の外にでてしまい、同じことでした。

調整方法はありますが、このままやっていても、私には解決の目処が立ちません。

一応、このmyCol/myRow の値を、実際の数値に入れてあげて調整することは可能です。
ただし、整数です。

.ScrollColumn = rng.Column - myCol
.ScrollColumn = rng.Column + myCol
.ScrollRow = rng.Row - Int(myRow / 2)

すくなくとも、画面に終点が出る以上は、その根拠となるものが見出せれば、私は可能だと思います。少なくとも、終わりの列を探しているのですから、「同じだ」と、言われるようなことは、私には想像つきません。

なぜ、ラインの終わりの列に画面が行かないのか、私には見当がつきません。特殊な状態になっているとしか思えません。非表示列があるとか。

いずれにしても、結果としては、線(Line)から、行き過ぎて、左にあるとか、右にあるようにも思えるのですが、この先に、ある程度の情報があれば、こちらも考えますが、「同じ」という意味は、そのマクロは使っても意味がないというメッセージだと思います。こちらも、マクロの押し売りするつもりがないので、これ以上は辞めておこうと思います。

仮に、直しても、全体的に特殊な状況になっていると、内容が変わると、うまくいくとは限りません。

私のほうも、セル幅をいろいろ変えてみたり、非常に大きくとったり、ウィンドウ枠を変えてみたり、結合セルで、キャンバス状態にしてみたり繰り返してみたが、線(Line)の右端が画面から切れて見えなくなってしまうような現象は再現できません。何度やっても、画面の中に押さえられています。

おそらく、実際のご質問者さんのPCの中で、ご質問者さんが、使っている作業そのものをみなければ、私は解決できないような気がします。いずれにしても、これ以上は、残念ながら、解決の目処は立たないように思います。いままで、私の経験では、こういうときに、特別な例ですが、機種固有や他の問題を抱えていたことがありますので、あまり、私のマクロのコード上の杓子定規な考え方を主張しても、結果的に解決しないことが多いようです。

私なら、たぶん、最初から大きくして、ズームと標準を行き来しないようにするか、また、「名前ボックス」や「ジャンプ」を使って作業するだろうと思います。

お手間を取らせてすみません。

こんにちは。

>マクロは使わせて頂きましたが、結局ズームはできても線を選択したら終点が画面の外にでてしまい、同じことでした。

調整方法はありますが、このままやっていても、私には解決の目処が立ちません。

一応、このmyCol/myRow の値を、実際の数値に入れてあげて調整することは可能です。
ただし、整数です。

.ScrollColumn = rng.Column - myCol
.ScrollColumn = rng.Column + myCol
.ScrollRow = rng.Row - Int(myRow / 2)

すくなくとも、画面に終点が出る以上は、その根拠となる...続きを読む

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【エクセル】データ用シートを作成し、すでにあるフォーマットへデータを反映させたい。

お世話になります。
日報を簡単に作成できないか?と言われ、試行錯誤をしている最中です。
日報へは
当日の出荷数・今月の出荷累計・当日の入荷数・今月の入荷累計等
を入力しないといけません。
入力は、PCに触ることがあまりない人もいて、
「データ入力用のシートがあって、それを入力するだけで、
日報ができたら嬉しいんですが」とのリクエストが・・・。
日報にはすでにフォーマットがあります。

新しく「データ入力用」というシートを作成し、そこへ1日から31日までの
出入荷量等の表を作成し、累計も計算できるようにし、
それらのデータを例えば6月1日とフォーマットに日付を入力すると
6月1日のデータが日報のフォーマットへ自動で入力されるというような
ことはできるのでしょうか?

また、できるのであれば、どのようにしたらいいのか、アドバイスいただけると嬉しいです。

説明が上手にできずに申し訳ありませんが、よろしくお願いいたします。

Aベストアンサー

アドバイスにしかなりませんが、似たようなものを作成したことがあるので
その方法を下記に記載します。

データ入力用シートに必要なデータ(日付、当日の入出荷数)を
列毎に入力できるようにします。(※A列は日付にする)
日報で表示したい計算の必要な値は(今月の出荷累計・今月の入荷累計等)
このシートで計算するセルを作っておく。

既にある日報フォーマットの日付セルに日付を入力すると
各データを表示したいセルにVLOOKUP関数でデータ入力用シートから
データを持ってくる方法が良いと思います。

例:=VLOOKUP(A2,データ入力用!A3:H35,4,0)
            ↑   ↑      ↑   ↑
            (1)   (2)      (3)  (4)

上記の条件
(1)日報フォーマットの日付入力がA2セルの場合
(2)シート名が「データ入力用」の場合
(3)日付、入出荷数等のデータが入力されているデータ範囲がA3からH35とした場合
(4)日付のA列を1として数えて、4列目のデータを呼び出す場合

※データ入力用シートは別ファイルとして作っても出来ます。

アドバイスにしかなりませんが、似たようなものを作成したことがあるので
その方法を下記に記載します。

データ入力用シートに必要なデータ(日付、当日の入出荷数)を
列毎に入力できるようにします。(※A列は日付にする)
日報で表示したい計算の必要な値は(今月の出荷累計・今月の入荷累計等)
このシートで計算するセルを作っておく。

既にある日報フォーマットの日付セルに日付を入力すると
各データを表示したいセルにVLOOKUP関数でデータ入力用シートから
データを持ってくる方法が良いと思い...続きを読む

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エクセル2010 ”オブジェクトの選択”方法

エクセルでオブジェクトの選択方法について質問です。

以前のエクセル2003では図形描画ツールバーの中に”オブジェクトの選択”矢印がありました。
これで範囲を選択すると選択内のオブジェクトが全て選択されました。
しかし、この矢印が2010では見つかりません。
何処にあるのか?他の方法でできるのか?もうその機能は無いのか?
ご存知の方、教えてください。

Aベストアンサー

こんにちは!

インターファイスが変わって慣れるまで少々時間がかかりますよね!

ホームタブ → メニューの一番右側に「検索と選択」がありますので、
そこをクリックしてみてください。
その中に「オブジェクトの選択」があります。m(_ _)m


人気Q&Aランキング

おすすめ情報