2010/2/14 12:15 Excel ・ 8,233 閲覧 2010/2/14 14:07（編集あり） Javascript の知識は皆無ということですが、特にわからなくても問題はないと思います。 ただHTTPプロトコルのRESTリクエストというのも分からないでしょうか。これを機会に少しだけでも勉強されておくと理解が深まると思います。（サンプルプログラムを示しますので、そのまま使えばいいですが） VBAについては理解されているということなので、B1セルに住所を入れて呼ぶと、C1、D1セルに緯度、経度を入れるというごく簡単なサンプルとしました。 実際に strAdrに入るアドレスをブラウザのアドレスバーにでも入れてみていただけたら理解できると思いますが、アプリケーションIDと（URLエンコードした）住所を与えてやると、地図データのXMLデータを受け取れます。 （詳しくは http://developer.yahoo.co.jp/webapi/map/localsearch/v1/localsearch.html を参照してください。） このXMLデータから緯度・経度のデータを抜き出せばいいわけです。 実際には住所が不完全だと複数の地点のデータが返ってきますが、サンプルですので、一番最初のデータを表示しています。 ところで、このサンプルを実行する前に、Yahoo!JAPANのアプリケーションIDを取得する必要があります。（無料です） Yahoo!JAPAN ID はすでにお持ちだと思いますので、Yahoo!JAPANにログインしてから http://developer.yahoo.co.jp/ にアクセスして、「アプリケーションIDの登録（無料）」をクリックして取得しておき、プログラム中の"この部分に取得したアプリケーションIDを入れてください"の部分にそのIDを入れてください。 Sub sample() 'サンプルとして、アクティブシートのB1セルの値を住所として 'Yahoo!JAPAN の濾過るサーチ Web API を利用し '緯度をC1セルに、経度をD1セルに返します。 Const strAppID As String = "この部分に取得したアプリケーションIDを入れてください" Dim strAdr As String Dim objJS As Object, objMSX As Object Set objJS = CreateObject("ScriptControl") objJS.Language = "JScript" strAdr = " http://map.yahooapis.jp/LocalSearchService/V1/LocalSearch?appid= " & _ strAppID & "&p=" & objJS.CodeObject.encodeURIComponent(Range("B1").Value) Set objMSX = CreateObject("MSXML2.XMLHTTP") With objMSX .Open "GET", strAdr, False .send With .responseXML If .getElementsByTagName("Count").Item(0).Text <> 0 Then With .getElementsByTagName("DatumTky97").Item(0) Range("C1").Value = .ChildNodes(0).Text Range("D1").Value = .ChildNodes(1).Text End With End If End With End With End Sub なお、サンプルの中で ScriptControl を CreateObject してなにやらやっていますが、これは住所をURLエンコード（「東京都」→「%E6%9D%B1%E4%BA%AC%E9%83%BD」のような）するためです。 Set objJS = CreateObject("ScriptControl") objJS.Language = "JScript" としてから、 objJS.CodeObject.encodeURIComponent(文字列) とすれば、URLエンコードした文字列が返ってきます。丸写しで使えば問題ありません。 それより理解しておいた方がいいのは objMSX という名前を使っている部分です。 MSXML2.XMLHTTP などをキーワードに検索すればさまざまなサイトがヒットすると思うので、基本的な知識だけでも身につけておかれると理解しやすいと思いますが、このプログラムの通りやれば、XMLを受け取ることが出きます。 ここでは、受け取ったXMLから "Item" というタグの項目を調べて、０でなければ（でたらめな住所だと０になります）、"DatumTky97"というタグの項目を調べて、子ノードの最初と次の項目を取り出しています。かなり手抜きです。はい。緯度経度を調べるだけならこれで十分かと思いますが、もっといろいろやろうと思えばHTTPプロトコルや、XMLについては、ある程度の知識が必要かと思います。 補足１ 「一番シンプルに出来る方法」というリクエストに応えられたかどうかは自信がありません。すいません。 あと、知らなかったですが、緯度・経度って、日本測地系緯度経度と世界測地系緯度経度というのがあるのですね。 世界測地系緯度経度の方が必要なのなら、DatumTky97ではなく、DatumWgs84を調べてください。念のため。 補足２ 御質問のように１０００箇所程度なら問題ないと思います。（VBAでのループの使い方は分かりますよね？） ただしローカルサーチAPIには、24時間中1IPアドレスにつき50000件のリクエストまでという上限がありますので、念のため頭に入れておいてください。 この回答はいかがでしたか？ リアクションしてみよう 早速ご回答頂きありがとうございました。まだ試していませんが、うまく取得出来そうな感じがしています。 お礼日時： 2010/2/14 23:44 先日おそらWindows11の更新以降だと思うのですが、エクセルのコピペとかシートのコピーとかができなくなりました。コピーのターゲットでCtrl+Cを押すと点線で囲みは出るんですが、ペーストができません。更新したあとに更新プログラムをアンインストールしても状況がかわりません。どうなっているのでしょうか？ Excel2016のコピペについての質問です。2026年9月9日よりctrl＋ｃ・ctrl+ｖのコピペ、フィルハンドルを使ってのコピーができなくなりました。再起動、設定の確認などしましたが改善しません。社内で同じバージョンのExcelを使っている人も同じ不具合が出ています。情報をお持ちの方がいらっしゃいましたら、教えてください。 【至急】Excelでコピペができなくなりました。直し方を教えてください。昨日から急に、Excelでセルごとのコピー＆貼り付けができなくなりました。【症状】・Excelでセルを選択してCtrl+Cを押すとコピーはできます。・Ctrl+Vを押しても貼り付けできず、貼り付けのオプションも表示されません。・右クリック→「貼り付け」でも貼り付けできません。ただし、「値として貼り付け」を選択すると貼り付けできます。・セルをダブルクリックして文字を選択し、その文字だけをコピー＆貼り付けすることはできます。・新しいBookでも既存のBookでも同じ症状が出ます。・Excel以外（ChatGPTなど）では... 急にExcelのショートカットキー貼り付けができなくなりました。コピーはできるのですが、今まで表示されなかった「アイテムがクリップボードに収集されました」が右下の方に出てくるようになり、クリップボードにはちゃんとコピーされているのになぜ貼り付けができないのか分からず、どなたかわかる方ご教示頂けますと幸いです。ちなみに右クリックから貼り付けを選択すると問題なく貼り付けらます。ショートカットのみ機能しません。 エクセルでコピーペーストができません。キーボードのショートカット、マウスで右クリック、エクセルのメニューバーのボタン、全部試しましたができません。切り取りはできました。・コピー範囲は選択できて、点線のピコピコが出てきます。・貼り付け箇所を選択してペーストしても空白のままでできません。・その後コピー範囲の点線はEsc押しても消えません。他のセルにデータ入力などのアプローチしても消えません。・オートフィルも使えません。右下の小さい四角は出てきますが、引っ張ってもデータ出てきません。・シート保護にはなってません。・オプションの中の詳細設定も確認しました。（フィルハンドルや切り取り関連の項目は全... エクセルで突然コピーした結合セルを貼り付けると統合解除されるようになりました。9月9日までは貼り付けても統合セルが解除されませんでした。今日の朝から、設定等をなにも変更していないのに突然そういう症状になりました。オフィスを再インストールしても同じでした。考えられる理由等して9月9日にWindowsのアップデートがありましたが、それの副作用的なものでしょうか。直し方を教えてください。Windows11で、OfficeLTSCProfessionalPlus2024です。 マイクロソフトの2026年9月8日公開のExcel2016向け更新「KB5002914」の更新をしてからコピペ、シートのコピーが使えなくなりましたが、パッチが入ったのか新規で作成するExcelではできるようになりました。しかし、それ以前に作ったExcelデータについては直っていないままです。何か手はありますでしょうか？ Excelに詳しい人に質問です。オートフィルができなくなりましたセルの右下にカーソルを置くと黒い十字は表示されるのですが、そのまま引っ張ってもセルに何も入力されず空白のままになります。解決方法を教えていただきたいです。 職場でExcelファイルを生成AIにまとめろと投げて、いまだに出てきた答えが正確であり、それがAI活用だと思っている同僚がいます。数式での計算であれば答えも正確だとは思いますが…テキスト内容の拾い出しやその集計とか…流石に数式を通さない回答にはブレが出るのは当たり前なんですが何度言っても聞き入れてもらえません。生成AIがなぜ拾ったか命令通りなのか答え合わせやダブルチェックもしない状態です。業務フローなど、スタートからゴールまで組み立ててどこで生成AIを使うべきかなども考えず、とにかく手っ取り早いし生成AIなんだから及第点は取れるだろうし効率的らしい様子です。まともに話しても理解してもらえ... パソコン初心者です。教えて頂けませんか？知人から不要になったノートパソコン（レノボ）を譲り受けましたが「エクセル」が入っていません。ウインドウ７です。手持ちのusbメモリの中のエクセルの表などを開くことが出来ません。パソコン店にたずねましたらインストールするには25000円くらい必要と。ネットで検索するとダウンロード無料と何軒も出てきますがなんか危ないし・・・。なにか良い方法をご存じないですか？ ワンスヒューマンの質問です 800円で売っている30日分の、サブスクを購入するといくつかの服装が試着できるようになりますが、髪型だけは期限が書かれていないように見受けられるのですが髪型は期限はな... テニスマシン スリンガーバッグは中古しか入手できません。故障時にサポートが無いのが問題ですが、耐久性など利用者の方の経験、印象など知りたいです。 【至急】 文化服装学院の願書の証明写真についてです。 （AO入試の認定は頂いてます。） 1）証明写真を撮る時メイクをしても大丈夫でしょうか？ 2）入学願書にはAO入試エントリーの時に使った...

ファイアーエンブレムif白夜で質問なんですけど主人公の素質を例えば傭兵にすれば主人公はマーシナリーになれると思うんですけど、支援Sの相手を作ってマリッジプルフでカムイから素質の恩恵を受ける場合、 白夜 バンスアンドハインズのショートショットをバッフルなし触媒なしにされている方いますか？ どのような音ですか？ 子供に買ったスイッチ２のアカウントの選択について ご質問させていただきます。 現在スイッチ１台を当方（親）のアカウントにて運用しております。 基本的に子供（6歳）がゲームをやる時もこのアカウン... ソフトテニスについて質問です。新型ボルトレイジ7にリフレクションクリアを貼りたいんですけど、合いますか?また、何ポンドがいいと思いますか？ 現在新型ボルトレイジ7にはSファング30かソニックブロ... 電子回路のHパラメータの問題なのですがこれで合っていますか？教えてください。 テレビ出演しているジャニーズアイドル教えてください JUDY AND MARYさんの「そばかす」の音作りをBOSSのGT-1で作りたいので教えてほしいです！ ※Vtuberの前世についてです。REJECTから新人Vtuberのカプラ・リブラスさんの情報が出されましたよね。リプ欄などで「懐かしい」や「聞いたことある声」などと言われていますが、前世はどなただったのでしょうか。 先日Netflixにて配信されたダウンタイムで質問です。 一応ネタバレ注意ですm(_ _)m最終話で文と廉(借金取りの人)が病院にて手を握りあったシーンがあったと思うのですが、2人は両思いなのでしょうか？ 日本女子バレー 名古屋アジア大会に、 石川真由ちゃんがメンバーに入ってないのはなぜですか？ ケガとか？ きゃにょんって結婚したのはガチですか？ そもそもきゃにょんは結婚してたとか言うのはホントですか？ Safariで85poを閲覧しようとしたらこのようにブロックされてます。 閲覧する方法はあるのでしょうか？ Netflixオリジナルドラマ「ダウンタイム」を見ようとしているのですが、気まづいシーンなどはありますか？ 猪俣周杜くんのことこんなに好きなのにこんな辛いことありますか。 現実ですか。ご飯食べれません。手が震えます 私が彼の知人だったら私のことどれだけ殴ってもどれだけ手を出されても許してたのに彼がまたアイドルとしてキラキラの人生を歩むことは無理ですか ラストコールでも話題のきゃにょんが結婚って流れてきたんですけど結婚相手って誰なんですか？特定されてますか？ 結婚相手も特定されていなくてきゃにょんだからネタとかじゃないんですか？ アジア大会について。 女子バレーのキャプテンの石川真佑はなぜいないのでしょうか？ ワンオクのtakaがエドシーラン関係？で若干荒れてるみたいなのですが、何があったんですか？ ログインボーナス 0 枚獲得！ ※一度に投稿できるURLは5つまでです ※氏名やメールアドレスなどの個人情報は入力しないでください