列のアルファベットを取得するには
2015年 09月 29日
めちゃくちゃ大きい表を渡されました。列番号はGZまで、208個のフィールド数です。
各フィールド名は長いし、同じ名前のものもあります。これをAccessにインポートしなければならない。
できれば、少しサイズダウンしたい、不要なフィールドは削除したいと思いました。画像はサンプルですよ。
a0030830_21195856.gif

必要なフィールドはどれなのか?担当者に取捨選択してほしいと思ったんですね。横にだらだら~っとみていくより、縦に並べて、他のツールのフィールドとも比較したいな思いました。
なので、上記の表を下のように並べ直したいと思ったのです。
a0030830_21274672.gif

が、フィールド名は選択して、行列を入れ替えて貼り付ければいいですが、ワークシートの列のアルファベットは取得できないですよね。
検索すると、下のページがヒットしました!きゃー、有難いですね。(人-)謝謝(-人)謝謝
エクセル関数で列の番号でなく、列のアルファベットを取得する方法

以下、やったことです。
まず、フィールド名の上に行を挿入します。
a0030830_21283726.gif

そして、セルA1に数式を入力します。
=LEFT(ADDRESS(ROW(),COLUMN(),4,1),LEN(ADDRESS(ROW(),COLUMN(),4,1))-LEN(ROW()))
その数式をコピーして、GZ列まで貼り付けます。見事にアルファベットを取得してます!
a0030830_21302127.gif

数式のままでは困るので、数式が入ったセルを選択してコピーして、値のみ貼り付けします。
a0030830_2132631.gif

今度は、セルA1からセルGZ2までコピーして、
a0030830_21332486.gif

新しいシートのセルA1で行列を入れ替えて貼り付けします。
a0030830_21343161.gif


Accessにインポートできるデータにするには、他にもデータ型を揃えるなど、いろいろやらなければなりませんでしたが、どうにか目的のものができそうです。
by hama_y | 2015-09-29 21:36 | Excel |▲TOPへ

<< ツイートボタンのバルーンが表示... Windows10ではAdob... >>



パソコンのお役立ち機能を一緒に学びませんか?[初心者のためのOffice講座 hamachan.info]のサポートブログです。
by はま
サイト内検索
記事ランキング
最新の記事
Windows10のIMEで..
at 2017-09-10 10:08
Systemによってファイル..
at 2017-08-24 12:32
Windows10のIMEに..
at 2017-08-24 11:49
新規ブックのワークシート数
at 2017-08-11 20:27
表の縞模様ダイアログボックス..
at 2017-08-10 23:53
Windows10でWi-F..
at 2017-07-17 18:02
ページレイアウトタブに「シー..
at 2017-07-08 11:57
リボンのユーザー設定で「基本..
at 2017-07-05 15:19
行の始まりのスペースを字下げ..
at 2017-07-04 17:41
既定のメールクライアントが設..
at 2017-06-27 18:45
ゴールシークのボタンの位置
at 2017-06-24 09:53
IMEのシステム辞書の[標準..
at 2017-06-14 20:45
ピボットテーブルのフィールド..
at 2017-06-11 21:22
ピボットテーブルの日付のグル..
at 2017-06-03 14:13
一瞬現れてすぐ消えるウィンド..
at 2017-05-30 17:04
関数の引数ダイアログボックス..
at 2017-05-25 20:44
PowerPivotで作成し..
at 2017-05-25 20:27
ページの背景に塗りつぶし効果..
at 2017-05-21 11:15
段落の先頭文字を大きくするド..
at 2017-05-15 08:59
Chromeで記事編集後、プ..
at 2017-05-05 15:13
リンク
カテゴリ
全体
Windows
IME
Office共通
Word
Excel
PowerPoint
Access
Outlook
Internet Explorer
Outlook Express
ホームページビルダー
ATOK
一太郎
筆まめ
筆王
筆ぐるめ
PhotoshopElements
ネットワーク
PCインストラクター
ああ~お客様
(@_@)
iPhone
SharePoint
未分類
以前の記事
2017年 09月
2017年 08月
2017年 07月
more...
検索
外部リンク