こんにちは
AccessかExcelからTxt形式で保存する必要があるのですが、その際に数字の表示を変えたいのです。例えば「100000」という数字があったとします。しかし、Txtには13byte(0000000100000)で出力しなければならず、頭の足りない部分は、必ず「0」を使わなければなりません。よって、「100000」をAccess(or Excel)上で文字列として「0000000100000」に変更してしまう事は可能ですか?ご存知の方がいらっしゃいましたら、是非ご教授ください。よろしくお願いいたします。

A 回答 (6件)

クエリでするなら、


任意のクエリを元テーブル(table1)を指定し、新規作成して

表示メニューのSQLビューを表示して、次のSQLを張り付けて、
!(実行)しましょう。
このとき、数値フィールド名はvです。

SELECT Format([v],"0000000000000") AS s1 INTO table2
FROM table1;
    • good
    • 0

Accessの元になるテーブルをAとし、ゼロを先頭に付加して出力したい項目をA1とします。


まず最初に「SELECT Format([A1],"0000000000000") AS expr1 FROM A;」というクエリーを作り、Bという名前で登録します。
その後「DoCmd.TransferText acExportDelim, , "B", "C:\A.txt"」という具合にTransfertextコマンドをを実行すればテーブルの構造を変更したりしなくともゼロを先頭に付加した形でテキストファイルに出力できます。
    • good
    • 0

アクセスを使うのであれば


更新クエリを使って
Format([フィールド名],"0000000000000")
で一括変換できると思いますよ
    • good
    • 0

アクセスも同じです。


Sub aa()
MsgBox (Format(10056, "0000000000000")) '書式を指定して表示
End Sub
    • good
    • 0

EXCELの場合です


セルの書式を変えることによって実現できます
具体的には、セルの書式設定の表示形式をユーザ定義にし、
種類を0000000000000とすればできると思います
    • good
    • 0

EXCELでもセルの書式設定を数字で桁数を設定してしまえば


良いんじゃないでしょうか?
セル>右クリック>セルの書式設定>表示形式>分類:ユーザー定義>種類
>「00000000000000」と入力
セルの数字がゼロの桁数分表示される。

Accessでもテーブルのカラムの書式を変えられなかったかなぁ?
ちょっと片方しか自信がないのですが、質問の内容にあっていなかったら
申しあけございません^^;
    • good
    • 0

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

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

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

Q頭にイボがあるんですが、 病院で取るとなると、どの科が良いと思いますか? 地元にある病院でもイボ取れ

頭にイボがあるんですが、 病院で取るとなると、どの科が良いと思いますか?
地元にある病院でもイボ取れますかね?
麻酔は、ちょっと頭だと嫌なんですが(*T^T)
首のイボは手術して取りました。
地元の皮膚科でもイボ簡単に取れますか❓
若いうちに、取った方がいいかな

Aベストアンサー

>どちらだと1日で行けば終わりますか?(^_^;
どちらも2回だと思います。2回目は経過を見るだけです。

QExcelのセルに数字と記号が混在している中から数字だけ選択してその数字を他のセルに記載する

Excelのセル(A)に数字と記号が混在していて、セル(A)の中から記号を除いて数字だけを選択してその数字をセル(B)に記載することはできるのでしょうか。ご教授頂ければ幸いです。「教えて!」よろしくお願いいたします。

Aベストアンサー

No.3です。
投稿を確認していると言葉足らずに気づきました。

>まずAlt+F11キー → メニュー → 挿入 → VBE画面のカーソルが点滅しているところに・・・
では判りにくいと思います。
>Alt+F11キー → メニュー → 挿入 → 標準モジュール → VBE画面の・・・
(「標準モジュール」を選択する部分が抜けていました)

どうも失礼しました。m(_ _)m

Q頭にあるほくろ(イボ)の除去手術について

以前から気になっている、ほくろとイボを取ろうと思っています。
ほくろの大きさは10mm×10mmで後頭部の少し下(首と頭のつけね)辺りに
イボは5mm×5mmで左耳の上の辺りにあります。

私のような場合、除去手術をする時
髪の毛を剃らないといけないと思うのですが
どのぐらい剃るのが一般的なのでしょうか?(^^;

場所的にその部分だけを剃るとかなり不自然ですので
頭を丸めることになるのかなぁと・・
学生の頃なら問題ないのですが、
一応社会人ですのでちょっと心配です(^^;

数年前に一度皮膚科で診てもらい、悪性ではないとのことでしたので
除去しなくても良いのですが、イボはまだ大きくなる可能性がありそうですし
ほくろはかなり大きいので、できれば取ってしまいたいと思っています。

アドバイスよろしくお願い致します。

Aベストアンサー

長辺1cmは無かったと思いますが結構でかいです。
大枚1枚でおつりがくるくらいだったと思いますが。
消毒、糸抜で2~3日通う必要があります。
ガーゼも血が止まれば、取ってもいいと思います。
(テープが頭にくっつかないので。でも自己責任でお願いします。
 病院にいけなければ家族にエタノール塗ってもらいましょう
 今が汗もでなくてちょうどいい季節じゃないですか)

ちなみに口の中に出来たできものは、切除しても化膿はしなかったです。
あたりまえか?

Qexcelで閉じる時の処理でAccessを開くがexcelの処理でAccessが開かない

Accessのテーブルをexcelで外部データとしてクエリーで利用する。通
常はAccessの運用でグラフだけをexcelで利用する。Accessのグラフ作
成でAccessを終了してexcelを起動する。この時の起動オプションで
waitフラグをtrueにして実行待ちをしている。

Accessでexcelは正常に起動する。逆に今度はexcelを閉じる時にAccess
を起動したい。この時の起動オプションにはwaitフラグは無いので。
excelが終了する前にAccessが起動しているので。

前のexcelがAccessのテーブルを専有していると言う事でAccessが読み
取り専用で開く。これは不味い。excleでAccessを開く時の起動オプ
ションにwaitフラグは無いのでしょうか。

このexcelでAccessを開く時にwaitフラグをセット出来ないとこの問題は
解決しません。waitフラグをセットする方法を教えて下さい。

excelの起動はshell関数を使っています。excelのvbaではwshの
CreateObjectは動くのでしょうか。それで問題は解決しそうですか。

よろしく回答願います。

Accessのテーブルをexcelで外部データとしてクエリーで利用する。通
常はAccessの運用でグラフだけをexcelで利用する。Accessのグラフ作
成でAccessを終了してexcelを起動する。この時の起動オプションで
waitフラグをtrueにして実行待ちをしている。

Accessでexcelは正常に起動する。逆に今度はexcelを閉じる時にAccess
を起動したい。この時の起動オプションにはwaitフラグは無いので。
excelが終了する前にAccessが起動しているので。

前のexcelがAccessのテーブルを専有していると言う事でAccessが...続きを読む

Aベストアンサー

以下の修正が必要になるかと。
1)
Dim wshsell

Dim wshshell
に変えてください。
2)
st = "C:\Program Files (x86)\Microsoft Office\Office12\MSACCESS.exe "
の最後の空白をとってください。
3)空白を含むパスをRunで実行する場合は、ダブルクオートでくくる必要があります。
st = """C:\Program Files (x86)\Microsoft Office\Office12\MSACCESS.exe"""
のようにしてください。
下記URLが参考になります。
http://jutememo.blogspot.jp/2014/03/vbscript-2.html

Q頭のイボは何科に行けばよいでしょうか?

後頭部の内部にイボができて押すと少しいたいのですが、診察してもらうのは何科に行けばよいでしょうか。脳神経外科でよいのでしょうか

Aベストアンサー

私だったら、まず皮膚科に行きます。
イボの状態を診てもらって、場合によっては皮膚科で処置できるかもしれないし、処置ができる施設のある病院の「形成外科」宛に紹介状が出るかもしれません。

Qexcelまたはaccessで重複行を数字に変換する方法

下記のようなデータがあります。

A
A
A
B
C
C

これを、

A 3
B 1
C 2

というふうに、重複している行を数字に変換したいのですが、方法を教えていただけないでしょうか。

excelまたはaccessのどちらでも構いません。
よろしくお願い致します。

Aベストアンサー

では、自分が使い慣れているAccessでの場合で説明します:

1)データベース ウィンドウのツールバーの『新規作成(N)』ボタンをクリックするなどして
 『新しいクエリ』ダイアログを開く
2)「デザイン ビュー」を選択して『OK』ボタンをクリック
3)『テーブルの表示』ダイアログで、対象となるテーブルを選択して『追加(A)』ボタンを
  クリックしたのち、同ダイアログを閉じる
4)ツールバーの『Σ』(集計)ボタンをクリック(またはメニューで「表示(V)→集計(L)」を選択)
 →画面下半分の「フィールド:」「テーブル:」の下に「集計:」の行が追加表示されます
5)画面の上半分から、A,B,Cが記録されたフィールドを画面下半分にドラッグ&ドロップ
 →『集計:』行に「グループ化」と表示されるので、ここはそのままにしておきます
6)もう一度、同じフィールドを画面下半分にドラッグ&ドロップ
 →その『集計:』行の「グループ化」を、「カウント」に変更します
7)クエリを保存して閉じる

・・・以上です。
このクエリを実行すると、ご要望の結果が得られると思います。

なお、『○○のカウント』という表示を変えたい場合は、そのクエリをデザインビューで開いて、
『フィールド:』の行の「○○のカウント: ○○」となっているところを、「重複数: ○○」とします。
(この場合、「重複数」がフィールド名として表示されます)

では、自分が使い慣れているAccessでの場合で説明します:

1)データベース ウィンドウのツールバーの『新規作成(N)』ボタンをクリックするなどして
 『新しいクエリ』ダイアログを開く
2)「デザイン ビュー」を選択して『OK』ボタンをクリック
3)『テーブルの表示』ダイアログで、対象となるテーブルを選択して『追加(A)』ボタンを
  クリックしたのち、同ダイアログを閉じる
4)ツールバーの『Σ』(集計)ボタンをクリック(またはメニューで「表示(V)→集計(L)」を選択)
 →画面下半分の「フィールド:」「...続きを読む

Q仔犬の頭にイボ?ができました。

初めまして。
生後2ヶ月2週間の、スムースチワワ(オス)と
暮らし始めて、今日で11日です。
昨晩、頭頂部に、直径2mm程のいぼの様な物を
見つけました。
前日にはありませんでした。

触っても痛がらず、色もついていません。
そして今日の昼間見たら、その部分の毛が抜けていました。
今は一日中一緒にいるので、頭をぶつけたりは
してないと思います。
でも、もしかしたら給水器にでも
ぶつけたのかもしれません。
怪我はないので、
何かの病気でしょうか。
場所が大泉門の真横なのも気になります。
来週、病院に行く予定なんですが、
救急に行った方がよいでしょうか。
今はとても元気で遊んでて、食欲も便も
変化はないです。
よろけたり等もないです。

長くなりましたが、どなたか
ご意見頂けるとありがたいです。
宜しくお願い致します。

Aベストアンサー

「大泉門不全」と言う言葉をキーワードに検索をして見て下さい。チラッとしてみましたが、可也ヒットした感じです。獣医師サイトを中心に見られている事をお勧めしますが、予定を早めて明日にでも行かれた方が良いかもですよ。真横と言う事なので、簡単にしてみましたが。チワワは、結構そちら関係が多いみたいですね。早ければ早い方が良い、と言う感じは、するけども、場合によっては設備整った大学病院か、個人病院を紹介される可能性もあるかも。さ、どうぞ。

QExcelのデータ(数字)をテキスト型としてaccessにインポートする方法

Excelの「セルの書式設定」を「文字列」にして、数字を入力し、accessで「インポート」すると「データ型」が「倍精度浮動小数点型」となって「1(2)」や「1&2」と入力した行がインポートできずerrorとなります(普通の数字はインポートできます)。Excelの書式設定を「ユーザ定義」→「@」としても同じです。またaccessでテーブルのデザインでそのインポートするフィルドを「データ型」としておいてインポート操作をしてもインポートされません。Excelを開きそのセルや行の書式設定を確認しましたが文字列となっています。どこが問題なのでしょうか?
また正しくインポートできる方法を教えてください。
accessとExcelのバージョンは2003です。
よろしくお願いします。

Aベストアンサー

Excelの「表示形式」を「文字列」にしているのに…というのを疑問に感じていらっしゃるようですが、この設定は、そもそも原則としては「表示上」のデータを整形する機能として用意されたもので、Access等のデータベースで、フィールド型を指定する機能とは、根本的に異なります。この点を理解されておいたほうがいいでしょう。

では、ExcelデータをAcessにインポートするときには、どのようにしてフィールド型を判別しているのかと言えば、1件目のデータからであると思われます。
文字列にしている列の1件目のデータは、数字のみ等の数値として認識できるデータではないでしょうか? これによって、「倍精度浮動小数点型」が自動設定されるのでしょう。ところが、「1(2)」などのデータは、型が違うので、エラーが表示されると。
「ANo.#2」さんの「方法3」ならうまくいくというのも、この理由でしょう。

ただ、私がExcel2002とAcess2002で試してみたところでは、おっしゃるような問題が発生しませんでした。何が、違うんでしょうねぇ。「ANo.#2」さんの「方法2」についても、私はうまく行きました。「方法1」のTXTファイルとして保存する方法ですが、Excelでカンマ区切りやタブ区切り形式で保存すれば、空白セルがあっても、問題ないと思いますがいかがでしょうか。

Excelの「表示形式」を「文字列」にしているのに…というのを疑問に感じていらっしゃるようですが、この設定は、そもそも原則としては「表示上」のデータを整形する機能として用意されたもので、Access等のデータベースで、フィールド型を指定する機能とは、根本的に異なります。この点を理解されておいたほうがいいでしょう。

では、ExcelデータをAcessにインポートするときには、どのようにしてフィールド型を判別しているのかと言えば、1件目のデータからであると思われます。
文字列にしている列の1件目の...続きを読む

Qイボの悩み(助けてください!)

私は患って7年ほどのウィルス性イボがひざ裏、左手甲と顎を中心にあります。イボの直径はほとんど1ミリ程度で放っておいても1年で1ミリ程度しか大きくなりません。ただ、小さなものがかなり増えてきます。大きさは前述のとおり、1ミリ程度かそれ以下のものがほとんどですが数が多いです。そのため、かかりつけの病院にいって診察してもらっても、医者も半笑いのあきれ顔でイボが小さいから様子を見るか、焼いてもらっても医者が目で確認できるほどのものしか液体窒素で治療してもらえません。他の病院を受診しても、「これは小さすぎるから放っておきましょう」とか、「イボってのはもっと大きくなるからこれはイボじゃないんじゃない」と言われ、自分の中で納得するものが得られません。漢方薬(ヨクイニン)も飲んでいますがあまり効果がなく、医者には体質だからしょうがないと言われます。
最近は顎にできたイボ(ほとんど1ミリ以下で外見ではほとんどわかりませんが数は多いです)が気になり、自分が心配性な性格もありますが「もしこのまま増えていったらどうしよう」「もう治らないんだろうか」と考え込んでしまい、ヒゲを剃ることも気になってできず、精神的に本当につらいです。二年ほど前は鏡を見て新しいイボを見つけるたびに全身から血の気が引いていき、頭が真っ白になり、その日は何もやる気が起きなくなり、それ以来、鏡はあまり見なくなりました。
最近は、「なぜ自分だけこんな目に遭うんだ」と考えたり、このようなネガティブな考えをする自分自身を責めたりする日々が続き、自分は本当に弱い人間だということを痛感します。医者の言うように「小さいから放っておけ」と考えればいいんですが、やはり自分の精神状態がその考えに追いついていきません。
こんな弱い私ですが、少しでもアドバイス頂ければ幸いです。

私は患って7年ほどのウィルス性イボがひざ裏、左手甲と顎を中心にあります。イボの直径はほとんど1ミリ程度で放っておいても1年で1ミリ程度しか大きくなりません。ただ、小さなものがかなり増えてきます。大きさは前述のとおり、1ミリ程度かそれ以下のものがほとんどですが数が多いです。そのため、かかりつけの病院にいって診察してもらっても、医者も半笑いのあきれ顔でイボが小さいから様子を見るか、焼いてもらっても医者が目で確認できるほどのものしか液体窒素で治療してもらえません。他の病院を受診し...続きを読む

Aベストアンサー

皮膚科で自費で一つ5000円とかでイボをとってくれますよね。

自費扱いなら、お金目当ての病院で
無理やり何とか取ってくれるかもしれません。

無数にあるのでいくらかかるかわかりませんけどね。

それより一年で1mmしか大きくならないのであれば、
大きくなった物だけでもとってもらうとか・・・

私もイボで皮膚科にかかってましたが、
自分でも気にしなかった小さな物も(ほとんど見えない、
もちろん1mm以下です)
「これもイボだね」って液体窒素で焼いてくれましたよ。

ですから、見た目もイボではないと思います。

ウイルス性のイボは、傷があればうつりますので
乾燥やキズに注意すれば広がらないと思います。

ネガティブな人をポジティブに変えることは
難しいので、とことんやってもらっても良いかもしれませんね。

お大事にして下さい。

QACCESSで同時に出た数字を数字別にカウントするにはどうすればよいのでしょうか?

現在ACCESSの勉強をしています。
1~6までの数字が書かれた6枚のカードから3枚を同時に引いて
出たカードの数字を記録していくデータベースを作るとき、


・同時に引いた3枚が1,3,6だった時
「1」のレコードに同時に出たカードの数字、3.6をカウント
「3」のレコードに同時に出たカードの数字、1.6をカウント
「6」のレコードに同時に出たカードの数字、1.3をカウント


数字(1~6)ごとに同時に引いた残り2枚の数字を
記録していくクエリを作りたいのですが
このような集計をするには
どのようにクエリを作成すればよいのでしょうか?
作成方法がわかる方、ご助力をよろしくお願いいたします。

Aベストアンサー

簡単にするには、クエリを2つ作ります。
結果クロス集計にご希望の結果が得られます。

クエリ:結果クロス集計
SELECT 結果テーブル.[1枚目] AS 元, 結果テーブル.[2枚目] AS 相手
FROM 結果テーブル
UNION ALL
SELECT 結果テーブル.[1枚目] AS 元, 結果テーブル.[3枚目] AS 相手
FROM 結果テーブル
UNION ALL
SELECT 結果テーブル.[2枚目] AS 元, 結果テーブル.[1枚目] AS 相手
FROM 結果テーブル
UNION ALL
SELECT 結果テーブル.[2枚目] AS 元, 結果テーブル.[3枚目] AS 相手
FROM 結果テーブル
UNION ALL
SELECT 結果テーブル.[3枚目] AS 元, 結果テーブル.[1枚目] AS 相手
FROM 結果テーブル
UNION ALL
SELECT 結果テーブル.[3枚目] AS 元, 結果テーブル.[2枚目] AS 相手
FROM 結果テーブル;

クエリ:結果ユニオン
TRANSFORM Count(結果ユニオン.相手) AS 相手のカウント
SELECT カードテーブル.カード
FROM カードテーブル LEFT JOIN 結果ユニオン ON カードテーブル.カード=結果ユニオン.元
GROUP BY カードテーブル.カード
PIVOT 結果ユニオン.相手 In (1,2,3,4,5,6);

簡単にするには、クエリを2つ作ります。
結果クロス集計にご希望の結果が得られます。

クエリ:結果クロス集計
SELECT 結果テーブル.[1枚目] AS 元, 結果テーブル.[2枚目] AS 相手
FROM 結果テーブル
UNION ALL
SELECT 結果テーブル.[1枚目] AS 元, 結果テーブル.[3枚目] AS 相手
FROM 結果テーブル
UNION ALL
SELECT 結果テーブル.[2枚目] AS 元, 結果テーブル.[1枚目] AS 相手
FROM 結果テーブル
UNION ALL
SELECT 結果テーブル.[2枚目] AS 元, 結果テーブル.[3枚目] AS 相手
FROM 結果テーブル...続きを読む


人気Q&Aランキング

おすすめ情報