<?xml version="1.0" encoding="utf-8" standalone="yes"?><rss version="2.0" xmlns:atom="http://www.w3.org/2005/Atom">
    <channel>
        <title>Vba on qwerty.work</title>
        <link>https://qwerty.work/tags/vba/</link>
        <description>Recent content in Vba on qwerty.work</description>
        <generator>Hugo -- gohugo.io</generator>
        <language>ja-JP</language>
        <lastBuildDate>Mon, 20 Feb 2023 00:00:00 +0000</lastBuildDate><atom:link href="https://qwerty.work/tags/vba/index.xml" rel="self" type="application/rss+xml" /><item>
            <title>【VBA】エクセルでどこのセル示しているか取得する関数</title>
            <link>https://qwerty.work/post/2023/02/vba%E3%82%A8%E3%82%AF%E3%82%BB%E3%83%AB%E3%81%A7%E3%81%A9%E3%81%93%E3%81%AE%E3%82%BB%E3%83%AB%E7%A4%BA%E3%81%97%E3%81%A6%E3%81%84%E3%82%8B%E3%81%8B%E5%8F%96%E5%BE%97%E3%81%99/</link>
            <pubDate>Mon, 20 Feb 2023 00:00:00 +0000</pubDate>
            <guid>https://qwerty.work/post/2023/02/vba%E3%82%A8%E3%82%AF%E3%82%BB%E3%83%AB%E3%81%A7%E3%81%A9%E3%81%93%E3%81%AE%E3%82%BB%E3%83%AB%E7%A4%BA%E3%81%97%E3%81%A6%E3%81%84%E3%82%8B%E3%81%8B%E5%8F%96%E5%BE%97%E3%81%99/</guid>
            <description>&lt;h2 id=&#34;addressfalse-falseで取得できる&#34;&gt;Address(False, False)で取得できる&#xA;&lt;/h2&gt;&lt;p&gt;例えば、&lt;code&gt;A1&lt;/code&gt;のセルから縦にレコードがいくつあるかカウントして、最後のレコードのセルが仮に&lt;code&gt;A5&lt;/code&gt;だっとしたら、&lt;code&gt;A1:A5&lt;/code&gt;といった感じでRange関数で指定するとしたら、以下のようになります。&lt;/p&gt;&#xA;&lt;pre tabindex=&#34;0&#34;&gt;&lt;code&gt;Range(&amp;#34;A1&amp;#34;, Range(&amp;#34;A1&amp;#34;).End(xlDown).Address(False, False))&#xA;&lt;/code&gt;&lt;/pre&gt;&lt;p&gt;&lt;code&gt;.Address(False, False)&lt;/code&gt;を加えれば取得できました。cells関数で座標をセルに変換するときは以下のようになります。&lt;/p&gt;&#xA;&lt;pre tabindex=&#34;0&#34;&gt;&lt;code&gt;cells(2,2).Address(False, False)&#xA;&lt;/code&gt;&lt;/pre&gt;&lt;p&gt;&lt;code&gt;.Address&lt;/code&gt;だけでも取得できます。&lt;code&gt;.Address(False, False)&lt;/code&gt;との違いは以下のようになります。&lt;/p&gt;&#xA;&lt;table&gt;&#xA;&#x9;&lt;thead&gt;&#xA;&#x9;&#x9;&#x9;&lt;tr&gt;&#xA;&#x9;&#x9;&#x9;&#x9;&#x9;&lt;th&gt;ソース例&lt;/th&gt;&#xA;&#x9;&#x9;&#x9;&#x9;&#x9;&lt;th&gt;取得する値&lt;/th&gt;&#xA;&#x9;&#x9;&#x9;&lt;/tr&gt;&#xA;&#x9;&lt;/thead&gt;&#xA;&#x9;&lt;tbody&gt;&#xA;&#x9;&#x9;&#x9;&lt;tr&gt;&#xA;&#x9;&#x9;&#x9;&#x9;&#x9;&lt;td&gt;cells(1,1).Address&lt;/td&gt;&#xA;&#x9;&#x9;&#x9;&#x9;&#x9;&lt;td&gt;$A$1&lt;/td&gt;&#xA;&#x9;&#x9;&#x9;&lt;/tr&gt;&#xA;&#x9;&#x9;&#x9;&lt;tr&gt;&#xA;&#x9;&#x9;&#x9;&#x9;&#x9;&lt;td&gt;cells(1,1).Address(False, False)&lt;/td&gt;&#xA;&#x9;&#x9;&#x9;&#x9;&#x9;&lt;td&gt;A1&lt;/td&gt;&#xA;&#x9;&#x9;&#x9;&lt;/tr&gt;&#xA;&#x9;&lt;/tbody&gt;&#xA;&lt;/table&gt;&#xA;&lt;h2 id=&#34;参考ページ&#34;&gt; 参考ページ&#xA;&lt;/h2&gt;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;  &#xA;&#xA;&#xA;&lt;div class=&#34;link-card&#34;&gt;&#xA;  &lt;a href=&#34;https://learn.microsoft.com/ja-jp/office/vba/api/excel.range.address&#34; target=&#34;_blank&#34; rel=&#34;noopener noreferrer&#34;&gt;&#xA;    &#xA;    &lt;div class=&#34;link-card-image&#34;&gt;&#xA;      &lt;img src=&#34;https://image.thum.io/get/width/300/crop/200/https://learn.microsoft.com/ja-jp/office/vba/api/excel.range.address&#34; alt=&#34;https://learn.microsoft.com/ja-jp/office/vba/api/excel.range.address&#34; loading=&#34;lazy&#34;&gt;&#xA;    &lt;/div&gt;&#xA;    &#xA;    &lt;div class=&#34;link-card-body&#34;&gt;&#xA;      &lt;span class=&#34;link-card-title&#34;&gt;https://learn.microsoft.com/ja-jp/office/vba/api/excel.range.address&lt;/span&gt;&#xA;      &#xA;      &lt;span class=&#34;link-card-url&#34;&gt;https://learn.microsoft.com/ja-jp/office/vba/api/excel.range.address&lt;/span&gt;&#xA;    &lt;/div&gt;&#xA;  &lt;/a&gt;&#xA;&lt;/div&gt;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;  &#xA;&#xA;&#xA;&lt;div class=&#34;link-card&#34;&gt;&#xA;  &lt;a href=&#34;https://www.tipsfound.com/vba/07022&#34; target=&#34;_blank&#34; rel=&#34;noopener noreferrer&#34;&gt;&#xA;    &#xA;    &lt;div class=&#34;link-card-image&#34;&gt;&#xA;      &lt;img src=&#34;https://image.thum.io/get/width/300/crop/200/https://www.tipsfound.com/vba/07022&#34; alt=&#34;https://www.tipsfound.com/vba/07022&#34; loading=&#34;lazy&#34;&gt;&#xA;    &lt;/div&gt;&#xA;    &#xA;    &lt;div class=&#34;link-card-body&#34;&gt;&#xA;      &lt;span class=&#34;link-card-title&#34;&gt;https://www.tipsfound.com/vba/07022&lt;/span&gt;&#xA;      &#xA;      &lt;span class=&#34;link-card-url&#34;&gt;https://www.tipsfound.com/vba/07022&lt;/span&gt;&#xA;    &lt;/div&gt;&#xA;  &lt;/a&gt;&#xA;&lt;/div&gt;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;  &#xA;&#xA;&#xA;&lt;div class=&#34;link-card&#34;&gt;&#xA;  &lt;a href=&#34;https://excel-ubara.com/excelvba1/EXCELVBA384.html&#34; target=&#34;_blank&#34; rel=&#34;noopener noreferrer&#34;&gt;&#xA;    &#xA;    &lt;div class=&#34;link-card-image&#34;&gt;&#xA;      &lt;img src=&#34;https://image.thum.io/get/width/300/crop/200/https://excel-ubara.com/excelvba1/EXCELVBA384.html&#34; alt=&#34;https://excel-ubara.com/excelvba1/EXCELVBA384.html&#34; loading=&#34;lazy&#34;&gt;&#xA;    &lt;/div&gt;&#xA;    &#xA;    &lt;div class=&#34;link-card-body&#34;&gt;&#xA;      &lt;span class=&#34;link-card-title&#34;&gt;https://excel-ubara.com/excelvba1/EXCELVBA384.html&lt;/span&gt;&#xA;      &#xA;      &lt;span class=&#34;link-card-url&#34;&gt;https://excel-ubara.com/excelvba1/EXCELVBA384.html&lt;/span&gt;&#xA;    &lt;/div&gt;&#xA;  &lt;/a&gt;&#xA;&lt;/div&gt;&#xA;&#xA;</description>
        </item><item>
            <title>【Excel】マクロを使わず広範囲のセルに対して「F2→Enter」を押したことにする方法</title>
            <link>https://qwerty.work/post/2022/05/excel-f2-enter/</link>
            <pubDate>Fri, 27 May 2022 15:26:14 +0900</pubDate>
            <guid>https://qwerty.work/post/2022/05/excel-f2-enter/</guid>
            <description>&lt;h2 id=&#34;無限に繰り返すf2enterの連打におさらば&#34;&gt;無限に繰り返す「F2→Enter」の連打におさらば&#xA;&lt;/h2&gt;&lt;p&gt;CSVなどエクセルで編集し、そのデータを他のアプリケーションに流し込む際、数字や日付が文字列として認識されてしまうことがあります。特に計算式などで表示を整えた日付などは、見た目が日付で列の形式を日付にしておいても、一度セルを入力モードにしてEnterを押さないと日付として認識されない場合があります。&lt;/p&gt;&#xA;&lt;p&gt;そんなときによくやるのが、列のデータがある上から下までF2→Enterをひたすら連打するのですが、データ量が多いと肉体的にも精神的に疲れます。これを一発で終わらせる方法があったのでメモ。&lt;/p&gt;&#xA;&lt;h2 id=&#34;vbaのイミディエイトウィンドウを使う&#34;&gt;VBAのイミディエイトウィンドウを使う&#xA;&lt;/h2&gt;&lt;p&gt;他にもマクロを使った方法がありますが、この方法はマクロを使わないし、マクロ有効ブックに保存しなおす必要もないので、簡単で便利です。&lt;/p&gt;&#xA;&lt;p&gt;ちなみにイミディエイトウィンドウとは、Excelでマクロのコードをいじるときに表示される**VBA（Visual Basic for Application）**にて使用できるエディタ機能で、主にコードの実行結果を試すなど、デバッグする時に使うもののようです。&lt;/p&gt;&#xA;&lt;h3 id=&#34;手順&#34;&gt;手順&#xA;&lt;/h3&gt;&lt;ul&gt;&#xA;&lt;li&gt;該当のエクセルファイルを開く&lt;/li&gt;&#xA;&lt;li&gt;Alt→F11を押して「VBE（Visual Basic Editor）」を起動&lt;/li&gt;&#xA;&lt;li&gt;[表示]-[イミディエイトウィンドウ]を選択&lt;/li&gt;&#xA;&lt;li&gt;イミディエイトウィンドウに対象範囲を含めた&lt;code&gt;[a2:z9999]=[a2:z9999].value&lt;/code&gt;を入力してEnter&lt;/li&gt;&#xA;&lt;/ul&gt;&#xA;&lt;p&gt;これだけで解決できます。あとはエクセルのファイルを上書き保存して終わりです。&lt;/p&gt;&#xA;&lt;h2 id=&#34;参考サイト&#34;&gt;参考サイト&#xA;&lt;/h2&gt;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;&#xA;  &#xA;&#xA;&#xA;&lt;div class=&#34;link-card&#34;&gt;&#xA;  &lt;a href=&#34;https://hirachin.com/post-1941/&#34; target=&#34;_blank&#34; rel=&#34;noopener noreferrer&#34;&gt;&#xA;    &#xA;    &lt;div class=&#34;link-card-image&#34;&gt;&#xA;      &lt;img src=&#34;https://image.thum.io/get/width/300/crop/200/https://hirachin.com/post-1941/&#34; alt=&#34;https://hirachin.com/post-1941/&#34; loading=&#34;lazy&#34;&gt;&#xA;    &lt;/div&gt;&#xA;    &#xA;    &lt;div class=&#34;link-card-body&#34;&gt;&#xA;      &lt;span class=&#34;link-card-title&#34;&gt;https://hirachin.com/post-1941/&lt;/span&gt;&#xA;      &#xA;      &lt;span class=&#34;link-card-url&#34;&gt;https://hirachin.com/post-1941/&lt;/span&gt;&#xA;    &lt;/div&gt;&#xA;  &lt;/a&gt;&#xA;&lt;/div&gt;&#xA;&#xA;</description>
        </item></channel>
</rss>
