[[20040906155907]] 『絶対参照で…』(あけじお) >>BOT

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『絶対参照で…』(あけじお)

はじめまして。今日はじめて質問させて頂きます。
早速ですが、1というシートでセルA1、M3、2というシートでセルB2、N5がそれぞれ別のシートに既にリンクされているのですが、絶対参照でのリンクではないのです。元々リンクされているセルを裏技を使って全て絶対参照にする方法はないのでしょうか?やはり最初からリンクし直さないといけないのでしょうか?かなりの量があるので、一気に出来ないものかと迷っております。良い方法はありませんでしょうか?


 何個のセルで行うのかわかりませんが(2箇所だけですか?)、
 セルを選択し、編集モードで、カーソルを、変更したいセルナンバーに合わせ、
 F4キーを押せば良いのではないのでしょうか。
 (A1→$A$1→A$1→$A1→A1と変化していくと思います。)(Σ)

(あけじお)
Σさん、回答ありがとうございす。2箇所だけですか?と言う事ですが、1つのファイルに
シートが20こ位作ってあり、その中でリンクさせてあるセルがかなり沢山あるのです。
1つづつF4キーを押していくのに時間がかかるので、リンクされてあるセルを
一気に絶対参照に変更する事はやはり無理なのでしょうか?

 検索―置換でできないものであれば、以下のようなマクロになると思いますが、

 Sub replaceStyle()
     Dim myCell As Range
     For Each myCell In Selection
         If myCell.HasFormula Then
             myCell.Formula = Application. _
             ConvertFormula(Formula:=myCell.Formula, _
             fromReferenceStyle:=xlA1, toAbsolute:=xlAbsolute)
         End If
     Next
 End Sub

 変更したいセルを選択し、上記のマクロを実行してできませんでしょうか?(Σ)

Σさん、お返事ありがとうございます。検索−置換では出来ないようです。
私がエクセルを理解していないだけなのかも知れませんが。 マクロについてですが
エクセルでのマクロを作った事がないので、どのようにすればよいのか
これから勉強してみようと思います。仕方なく1つづつF4キーを押して
地道に作業しました。マクロまで作って頂きありがとうございます。
一応、解決にします。

 あら(^_^;) もったいないことを・・・
 私は全部の数式を変えることなんて無理だと思ってたのに、
 Σさんのマクロは見事に絶対参照に変換してくれますよ〜^^
 (川野鮎太郎)

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.