Excel97を使っています。
マウスで指定されたセルの位置が返される関数はありますか?
例えば、その関数をA1に入れておくと、マウスで指定したセルの位置がA1に返されるという関数です。
要するに数式バーの左端に現在のセルの位置が表示されていますよね。
それを関数で指定のセルに表示したいのです。

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

A 回答 (3件)

補足について、Sheet1で処理を行う想定で書いてみました。


最初のConstの2行で、A列と4行目までを指定しています。実情に合うよう変更して下さい。

Sheet1のコードウインドウに貼り付けます。
最初の質問の回答とは同時登録できませんのでご注意ください。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Const BoldCol = "A"    '太字にする列
  Const maxRow = 4      '太字にするセルの最後の行(開始は1行目から)

  '単一セルの操作の場合
  If Target.Count = 1 Then
    'A列の太字属性を解除
    Range(BoldCol & "1:" & BoldCol & maxRow).Font.Bold = False
    If Target.Row <= maxRow Then
      '特定行にあればA列を太字属性にする
      Range(BoldCol & Target.Row).Font.Bold = True
    End If
  End If
End Sub
    • good
    • 0
この回答へのお礼

うわ~! すごい。
まさに前々から、こんなことが出来ればいいなと思いつつ、マクロってチンプンカンプンで投げ出していました。
今でも詳しい意味はわからないけど、コピーして貼り付けさして頂き、自分の知識で解る範囲で改修して利用さしていただきます。
ありがとうございました。

お礼日時:2002/03/16 13:47

こんにちは!



数式では

=ADDRESS(CELL("row"),CELL("col"),4)

こんな感じでしょうか!

ただし、この関数(CELL())は再計算処理がされた時に
更新されますから、

>マウスで指定されたセルの位置が返される

にはならず F9を押すか数値を入力した時点で値が
返されます。

リアルタイムに値を返すのならやはり
#1 nishi6 さんのVBAになると思います!

この回答への補足

ご回答ありがとうございます。
大変参考になりました。
No1の回答の補足でお願いしてますが、良い方法があればご指導ください。

補足日時:2002/03/16 12:29
    • good
    • 0

ワークシート関数は思いつきませんでした。

マクロで行ってみました。

ツール→マクロ→Visual Basic Editor でVBE画面に移り、
表示→プロジェクトエクスプローラでプロジェクトエクスプローラを表示し、

(1)Sheet1に質問の機能を実現する場合は
    →プロジェクトエクスプローラのSheet1をダブルクリック
    →出てきたコードウインドウに下記マクロを貼り付けます。(3行)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Range("A1") = Target.Address(False, False)
End Sub


(2)どのシートにも質問の機能を実現する場合は
    →プロジェクトエクスプローラのThisWorkbookをダブルクリック
    →出てきたコードウインドウに下記マクロを貼り付けます。(3行)

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
  Sh.Range("A1") = Target.Address(False, False)
End Sub

当方、Excel2000ですが、Excel97でも問題ないでしょう。ご参考に。

この回答への補足

早速ご回答くださいましてありがとうございます。
マクロのことは余り知識がありませんが、ご指示通りにマクロをコピーして貼り付けますと、うまくいきました。
的を外れた追加質問になるかもしれませんが、教えてください。
シートの左端に行番号がありますが、現在のセルの位置の行番号が太字に表示されて、現在のセルが何行目かすぐわかりますよね。
この様に例えば、A1に水道光熱費、A2に旅費交通費、A3に通信費、A4に交際費と標準文字で入力されていたとき、セルが1行目にあるときは(何列目であっても)A1の水道光熱費が太字文字で表示され、セルが2行目にあるときはA2の旅費交通費が太字文字で表示されると言うような事はできるのでしょうか?
もちろん行が変われば、標準文字に戻るようにです。
よろしくお願いします。

補足日時:2002/03/16 11:52
    • good
    • 0

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

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

このQ&Aを見た人はこんなQ&Aも見ています

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

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

Qオフ車250ccで セルが回らない(泣) 

お世話になります。
ストレス発散に久々にバイクに乗ろうとしたら!
 
▼セルが回らない 
 ⇒バッテリーあがり?
▼業者に来て貰う 
 ⇒バッテリーつないでも(充電しても)かからないと言うより 
  セルがウンともすんとも言わない。

*冬の間は一度も乗らず
*先月、軽4につなげて 30kmほど走行
*ガソリン少なめ
*いつもは車は充電器につなげたら、一発でかかる
*今回は セルを押してもライトが押してる時に消えるだけで
セルの独特のティティティティ って音もしない
ウィンカー類は特に問題なし。

以上より。
キックはついておらず、私は押しがけはできません。
(昔はできたけど、女だし今の体力では厳しい・・・)

質問として
1.押しがけして エンジンがかかる可能性はあり?
 (ならば男友達に頼もうかと。)
2.バッテリーの問題?
 新品パッテリー購入すれば セルが回る可能性あり?
 (ならばとりあえずバッテリー購入)
3.セルの接触不良の問題?
 (素人でも調べる方法はアリ?セルモータをたたけば一時的に
  かかるとも聞いたことがあるが セルモータはどこにある?)

アドバイスお願いします。
ちなみにバイクは SUZUKI DR250R 98年式
バッテリーは毎年買いなおしています・・・
もともと電気系統のウィークポイントが多く なんと2000年式から
ノーマルでキックスタータがついたと言うバイクです。


 

お世話になります。
ストレス発散に久々にバイクに乗ろうとしたら!
 
▼セルが回らない 
 ⇒バッテリーあがり?
▼業者に来て貰う 
 ⇒バッテリーつないでも(充電しても)かからないと言うより 
  セルがウンともすんとも言わない。

*冬の間は一度も乗らず
*先月、軽4につなげて 30kmほど走行
*ガソリン少なめ
*いつもは車は充電器につなげたら、一発でかかる
*今回は セルを押してもライトが押してる時に消えるだけで
セルの独特のティティティティ って音もしない
ウィンカー類は特...続きを読む

Aベストアンサー

こん**は

 まずはバッテリーですね
 フル充電するか、新品に交換してください。
 次はスタータースイッチを点検してください。
 分解して中が汚れていないか確認です。
 汚れいればパーツクリーナなどで洗浄してください。
 バッテリーとスイッチが正常ならスターターリレーですね
 スイッチを押して「かちっ!」と言うならとりあえずは正常です。
 言わないのならリレー交換です
 リレーが正常なら、次はモーターです。
 モーターはエンジンから外して回るかどうか確認しましょう。
 モーターが回ればエンジン内(クラッチ周り)の故障
 モーターが回らなければモーター交換となります。

 確実にチェック出来る計測機器を用意してください
 工具、テスター等が無いのなら、詳しい友人に頼むのが良いでしょう
 どれもないのなら素直にバイク屋に行かれるのをお勧めします

Qエクセル関数にて指定位置から下と横にずれた位置の参照する関数について

自社のホームページ上から支店別の販売成績を閲覧出来るのですが、成績の良い支店順に成績が表示されるので自分で支店のアルファベット順に成績結果を修正してオリジナルの成績表を作成しています。
しかし添付画像にありますように支店名の位置が毎日変わるので支店名を基準にした成績を表示するにあたりVLOOKUP関数やHLOOKUP関数では基準のセル位置から真下、真横の位置にあるセルを参照する数式は分かるのですが、基準の位置にあるセル(支店名Aから右にいくつ下にいくつという様に)からずれた位置にあるセルの参照式が分かりません。何卒ご教授願います。

Aベストアンサー

こんばんは。
回答されている皆さんみたいに詳しい者ではないのですが、
コメント失礼します。

回答から、「OFFSET」「MATCH」を使用してサンプルファイルを作成してみました。

よろしければご確認頂ければと思います。
http://firestorage.jp/download/3d907cbdb7ea200114d4c243f0e74bd722f35ab6

ファイル名:サンプル_.xlsx

解決になっていなかったらすみません。
こちらの質問とても勉強になりました。
他の回答者の方々もありがとうございました。

Qセルが回らない

ybr125に乗っているのですが、セルが回らないため始動できません。

セルスイッチを押すと「カチっ」と音を立てるだけです。
夏頃から回りづらいと思ってはいたのですが、冬になると完璧に回らなくなりました。

最初はバッテリーを疑って2~3年物のバッテリーを新品に交換
現在、電圧はテスターで測ったところ12~13Vあります。

セルモーター自体はブースターケーブルを使って車から回すと快調に回ります。
押しがけではかかります。

今日はスターターリレーを交換してみましたが変わりませんでした。
ヒューズも交換済みです。

どこら辺が怪しいと思いますか?
キャブまで分解清掃したほうがいいでしょうか?

Aベストアンサー

>セルモーター自体はブースターケーブルを使って車から回すと快調に回ります。

↑この意味が理解出来ませんか?

車のバッテリーからブースターケーブル繋いで回るなら「バイクのバッテリーが弱ってる」のです。

バッテリーの電圧をテスターなどで測る場合は電流負荷を掛けないと弱っていても12Vから13Vの電圧は出ますから「セルモーターを回した時の電圧」を測ってください。

恐らく、8V以下の電圧に下がってしまうはずです。

だから、セルを回すだけのパワー(電流)がバッテリーから供給されずに回らないのです。

バッテリーを新品に換えても「バッテリーに充電されなければ直ぐに容量不足」になってしまいますから、充電系統が故障してる疑いもありますから、エンジン始動後にヘッドライトやウインカーを点けてエンジン回転数を上げたり下げたりして明るさが大きく変化するか確認してください。

また、その時のバッテリー電圧を測ってください。

エンジン回転数に応じてバッテリー電圧が変動するはずですが、バッテリーが正常に充電されて満充電状態になれば電圧変動は少なくなります。

結論は、バイクのバッテリーが充電不足で弱ってるからなので、充電器で充電するか長距離を走行してバイクの発電機で自力充電を行ってください。

バッテリーが元気に回復すれば、車からブースターケーブルを繋がなくてもセルが回るようになります。

>セルモーター自体はブースターケーブルを使って車から回すと快調に回ります。

↑この意味が理解出来ませんか?

車のバッテリーからブースターケーブル繋いで回るなら「バイクのバッテリーが弱ってる」のです。

バッテリーの電圧をテスターなどで測る場合は電流負荷を掛けないと弱っていても12Vから13Vの電圧は出ますから「セルモーターを回した時の電圧」を測ってください。

恐らく、8V以下の電圧に下がってしまうはずです。

だから、セルを回すだけのパワー(電流)がバッテリーから供給されずに回...続きを読む

QSUMIF関数で検索条件の指定セルの下の空白セルを指定

関数初心者です、よろしくお願いいたします。
  SUMIF(Sheet2!$C:$C,"あいうえお",Sheet2!$G:$G)
という数式を作りました。
この場合の検索条件C列の”あいうえお”の「2つ下のセル」を検索条件と
したいのですが、その2つ下のセルは文字も数値も入っていません。
(空白のセル)
条件としてC列”あいうえお”とか”かきくけこ”のセルの
常に2つ下のセルを条件にしたいのですが指定はできないのでしょうか。
どうかよろしくお願いいたします。

Aベストアンサー

こんにちは
=SUMIF(Sheet2!$C1:$C65534,"あいうえお",Sheet2!$G3:$G65536)

検索の範囲と合計範囲をずらしてみたのですがどうでしょうか

Qライトはつくのに、セルが回らない!!

お世話になります。

先日、HIDの片方が点灯しなくなった為、新しい商品を購入、今日取り替えました。
けっこう時間はかかったものの、なんとか無事に終わりまして、車を車庫から移動させました。

その後、2時間くらい経ってから、車に乗ってエンジンをかけようとしたら、セルが全く回らなくなってしまいました。

ヘッドライトも付きますし、ルームランプもナビも正常に動きます。

とりあえず、アクセサリ→オンまではいつも通りですし、カチカチと言う音もします。
しかし、そこからどんなに回しても、ウンともスンとも。。。

違う車で何度かバッテリーを上げた事もありますが、、セルが回らないと言ってもキュルキュルぐらいは音が鳴って、エンジンがかからないと言った症状ではあったのですが、今回は本当に何の音も鳴りませんし、何の反応もありません(汗

HID(バルブではなくキットごと)を交換した際に、バッテリーを外しましたので、締め方が緩かっただろうか?と思ったのですが、そうでもないようです。

試しに、他の車のバッテリーとケーブルで繋いでセルを回してみましたが、同じ結果でした。。。(泣

これは何が原因と考えられるでしょうか?
ライトやナビ自体は正常に付くので、バッテリーではないと言うことでしょうか?
セルモーターですか?
今まで不具合らしい不具合は無かったのですが、それともやはりHID交換時に何かしてしまったのでしょうか。。。

車屋にも連絡して見ましたが、今日明日はどうしてもレッカーを使えないそうで。。。

どなたか、詳しい方がおられましたら、どうか想像の出来る範囲でも構いませんのでお知恵をお貸し頂きたく思います。
助けてください(泣
よろしくお願い致します!!

お世話になります。

先日、HIDの片方が点灯しなくなった為、新しい商品を購入、今日取り替えました。
けっこう時間はかかったものの、なんとか無事に終わりまして、車を車庫から移動させました。

その後、2時間くらい経ってから、車に乗ってエンジンをかけようとしたら、セルが全く回らなくなってしまいました。

ヘッドライトも付きますし、ルームランプもナビも正常に動きます。

とりあえず、アクセサリ→オンまではいつも通りですし、カチカチと言う音もします。
しかし、そこからどんなに回しても、ウン...続きを読む

Aベストアンサー

>カチカチ
どういう状況での音?、(1)キーをひねった時、(2)セル始動しようとした時、(3)その他。
真っ先に、セルモーターに十分な電気が行っていない(確実な状況)。
何故?、バッテリーに十分な電力がない(セルはライトの十倍以上必要と思うべし)(2)の時。
バッテリーOKだが(2)、バッテリ、セル直結する(ソレノイドスイッチ接触不良)ただし(1)の時で(2)で音がしない時はソレノイドスイッチの駆動回路に問題。
セルモーターの異常。
電気系をいじった後であり、2時間後の状況から、配線ミスでショートの可能性も否定できません。

QEXCEL97のSUM関数で指定できるセル数

こんにちは。
タイトル通りなのですが、ヘルプを見ると30個までと書いてありました。

連続したセルなら指定可能なようなんですが、集計したいセルは1つ置きで、最大個数が今のところ100を越えています。

この場合、
1.30個ずつ小計する関数を入れた非表示のセルを作り、それを合計する。
2.VBAで計算し値だけを集計のセルに入力する。

どちらの方が良いのでしょうか?
ちなみに2はまだ試した事が無いので、やり方等はこれからなのですが、2だと各々の値が入ったセルが更新されても、もう一度マクロを実行しないと再集計されないですよね。

けれど、作った表を客先にデータとして納品するときは、1だと渡してしまった後に向こうで変更してもらうときややこしかったりしないでしょうか。

上手く説明できませんでしたが、よろしくお願いします。

Aベストアンサー

1つおきにってのが1行おきだと仮定します。力技で
=A1+A3+A5+A7+A9+A11+A13
とする代わりに
=SUMPRODUCT(A1:A14,ROW(A1:A14)-ODD(ROW(A1:A14))+1)
と書きます。偶数行なら、式の中のODDをEVENに換えるだけ。

1列おきの場合、式のROWをCOLUMNに換えればいいような気がする
なぁ。自分で検証してみてください。

Qセルが回らない CDIの故障はあり得ますか?

こんばんば。
ネットで買ったバイクのレストアをしている者です。(レストア初心者です。)
セルスイッチを押してもモーターが回りません。
※良くある、セルスイッチを押してもカチッと音がするだけでセルが回らないってヤツではありません。
セルスイッチを押してもうんともすんとも言いません。
いろいろ配線をチェックしたのですが、原因が分かりません。
そこで下記のサイトを見ましたところ、ジャンクションボックス内にもスターターリレーのスイッチがあるという事を知りました。
http://motor.geocities.jp/cfsxd043/kawasaki/kawa1.html
(1)このジャンクションボックス内のスターターリレーの部分が壊れてセルが回らないって事はあり得ますか?

それと、スターターリレー直結すると、セルモーターが回り、エンジン始動します。

また、スターターリレーが故障しているかチェックする方法を教えてください。

よろしくお願いします。

Aベストアンサー

>スターターリレー直結すると

この意味が曖昧なので断定できないですし
車種が不明ですが、リレーは大体ヒューズ(15~30A)と
一体になってバッテリー近辺にあるスイッチです。
http://www.geocities.co.jp/MotorCity-Circuit/2519/electrics/relay.html

キル、セルボタン等の接触不良があるとリレーに
12V来ないのでリレーが動作しません。
セルスイッチ等の接触やアースが正常でボタン押すか
バッテリー直でリレーの+側に12V送りリレーが動作しない
カチってならないならリレーの故障です。
リレー自体は、9~10Vあれば動作する部品で
長期放置だと固着したり壊れる場合があります。

その他で多いのは、ターミナルの接触不良
バッテリーのマイナス端子からボディやシリンダーに
いく配線の腐食や接触不良などもあります。
キーONで電装やランプが点灯しても、接触が
不十分だと大電流を必要とするためセルモーターは回らない
リレーがカカカカってしか動作しない例も
ありました。

中には特殊な車種、構造のものもあるので
本気でレストアするなら車種くらいは提示するか
サービスマニュアル購入たほうがいいですよ。
そこにリレー以外の電装のチェック方法や始動不能の場合の
フローチャート、配線図も詳しく書いてあるので。
http://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q1248608007

>スターターリレー直結すると

この意味が曖昧なので断定できないですし
車種が不明ですが、リレーは大体ヒューズ(15~30A)と
一体になってバッテリー近辺にあるスイッチです。
http://www.geocities.co.jp/MotorCity-Circuit/2519/electrics/relay.html

キル、セルボタン等の接触不良があるとリレーに
12V来ないのでリレーが動作しません。
セルスイッチ等の接触やアースが正常でボタン押すか
バッテリー直でリレーの+側に12V送りリレーが動作しない
カチってならないならリレーの故障です。
リレー自体は、9...続きを読む

Q現在のセルの位置を返す関数は?の関連質問です

質問No.236012で素晴らしい回答頂きましたが、締め切ってしまいましたので追加質問をさして頂きます。
nishi6さんの回答No3で
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Const BoldCol = "A"    '太字にする列
  Const maxRow = 4      '太字にするセルの最後の行(開始は1行目から)
の部分で太字にする開始は1行目からになっていますが、例えば2行目から4行目までという風に、開始の行と最後の行を指定する場合はどのようにすればよいでしょうか。

Aベストアンサー

開始行を指定するようにしてみました。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Const BoldCol = "A" '太字にする列
  Const startRow = 2 '太字にするセルの最初の行
  Const maxRow = 4 '太字にするセルの最後の行

  '単一セルの操作の場合
  If Target.Count = 1 Then
    'A列の太字属性を解除
    Range(BoldCol & startRow & ":" & BoldCol & maxRow).Font.Bold = False
    If startRow <= Target.Row And Target.Row <= maxRow Then
      '特定行間内にあればA列を太字属性にする
      Range(BoldCol & Target.Row).Font.Bold = True
    End If
  End If
End Sub

開始行を指定するようにしてみました。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Const BoldCol = "A" '太字にする列
  Const startRow = 2 '太字にするセルの最初の行
  Const maxRow = 4 '太字にするセルの最後の行

  '単一セルの操作の場合
  If Target.Count = 1 Then
    'A列の太字属性を解除
    Range(BoldCol & startRow & ":" & BoldCol & maxRow).Font.Bold = False
    If startRow <= Target.Row And Target.R...続きを読む

Qセルが回らない(T^T)

バリオスなのですが、バッテリーは、充電をし完璧な状態なのにセルが、回らない セルスイッチを押しても 「カチッ!!」と言う音しかしません。これは、セルが悪いのでしょうか?

Aベストアンサー

下記のURLに同じような症状のバイクがありました。
No.9に私が回答していますが、このときの質問者は
これで直ったようです。
一度、ご確認下さい。

参考URL:http://oshiete1.goo.ne.jp/kotaeru.php3?q=1412669

Qエクセル/指定範囲のセル数を返すワークシート関数は?

エクセル2000です。
たとえば、A1:A100の範囲に、空白か否かを問わずセルがいくつあるかを返すワークシート関数はないでしょうか?

空白以外の数+空白の数で求められるかと思いましたが、
=COUNTA(A1:A100)+COUNTBLANK(A1:A100) では、計算の結果 ="" になっているセルが両方にカウントされてだめです。
VBAなら Range("A1:A100").Count で一発なのですが・・・・。

Aベストアンサー

◆こんな式はいかがでしょうか
=COUNTIF($C$15:$D$24,"<>=?")


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング