![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?8acaa2e)
初めて質問します、電子レジスターを購入したんですが
部門ごとの集計はパソコンにすぐにダウンロードできるのですが
1件1件の購入履歴をエクセルで使えるようにしたいのですが・・・
集計はエクセル方式ででてくるので問題はないのですが
1件1件の購入履歴は テキストファイルでしかでできません・・・(+_+)
こんな形ででてきます・・
2008年11月 2日 14:22 1
000000#0045
部門5 非\12,000
個数 1個
現金 \ 1 2 , 0 0 0
2008年11月 2日 14:22 1
000000#0046
部門3 非\200
個数 1個
現金 \ 2 0 0
2008年11月 2日 14:22 1
000000#0047
部門1 内\5,000
**小計 \5,000
(内税) \238
個数 1個
現金 \ 5 , 0 0 0
なんとかしたいのですがだれか助けてください(~_~;)
ちなみに11/25日オープンですw
A 回答 (3件)
- 最新から表示
- 回答順に表示
No.3
- 回答日時:
何とかやりたいといっても、質問者の過去の経験+少しの勉強次第だ。
VBAの中級程度の技量で出来ることと予想する。それとVBAのコードはWEBにあふれている範囲だと思う。出来ないなら、金を払って業者にやってもらうしかない(これがキホンであることを忘れないように)。上記記録の全貌(色んなケース)を知らないなどで、下手にプログラムを組んで、後日誤りなど出たら、質問者の責任で、そういうことも、時どきある。
ーー
このレジスターはフロッピーディスクなどに、「客に渡すレジと同じ内容の連続したような記録」が記録され、パソコンでも読めるというように受け取ってよいですか。<ーダウンロードとは??に対し
ーー
テキストファイルをVBAで読むコードはWEB等でありふれている。
各(1人?)取引記録(の行数は)には、多少はなく、5行ずつのようだから、
5レコード読んで、エクセルの1行の決まった列にセットしていく(下記注1)。
それをジャーナル記録が終わるまで、5行単位で繰り返す。
多分エクセル側に用意する列(項目)は、私の予想では
年月
時刻
コード?
連番?
部門
非?
金額
個数
現金??(受け取り内訳?)
ぐらいかと思うが、非?や現金??(受け取り内訳?)の内容(意味)によって複数列の用意が必要かもしれない。こういうことは質問に説明すべきだ。
ーーー
テキストファイルの読み込みのコード
http://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub0 …
ほか多数。「テキストファイル 読み込み VBA」でグーグルで照会。
ーー
エクセルのシートのセットする行をCells(i、”A")のようにして
i が行番号指定だが、テキスト5行読むごとに+1する(下行を指定する)。
(注1)Cells(i、”A") はA列にセットする場合で、B列にはCells(i、”B")=(テキスト側の項目)、のようになる。
それを必要な項目数(列すう)分上から下に書き連ねる。
--
流れは
繰り返し:
テキストの終わりはEOF(1)でわかる。
1テキストレコード読み
1列または複数列セット
次の1テキストレコード読み
1列または複数列セット
・・・
第5レコード読み
1列または複数列セット
i=i+1 (エクセルでの記録行を下へずらす)
Goto 繰り返し
のような構造になる。
早速のご回答本当にありがとうございます
VBA現在勉強中です。あまり時間がありませんので
必死に勉強ですw
読み込みの仕方など工夫が必要ですね。。
そのあたりも勉強します
たまに6行、7行になるものですから。。
ありがとうございました
No.2
- 回答日時:
テキストファイルならそのままエクセルに読み込めます。
(csvにするか、又は、エクセルを開いておいてドラッグ&ドロップでも可)
ご質問を見る限り、1件のデータの行数は不定のようですので、読み込んだ後で、日付をキーとする(あるいはその他)などで、1件ごとに分割してやればよいのでは?
具体的な情報がないので、これ以上書けませんが、使用目的に応じてデータ処理をしてやればよいでしょう。
処理が決っていて、ルーティンワークなら、マクロにしておいてもよいでしょう。
No.1
- 回答日時:
”この様に出てきます”だけではどうしたいのか不明です。
”この様に出てくる物を、この様な形式にしたい”が質問ではないかと。
ちなみに「電子レジスター」のメーカーに相談はされてないのでしょうか。
この回答への補足
ご回答ありがとうございます
メーカーはシャープなんですが
相談したところ「できない」とのこと
購入時は、
「データをパソコンに取り込み自由に管理できます」
と言われてましたが、実際購入すると肝心なところができない
その事をシャープに投げかけると
「電子ジャーナルのデータを取りこめるとは言ってない」
(詳しく聞かなかった私が悪いのですが、当然できる風な言い方だったもので・・)
で、こちらでなんとかしないといけなくなりました・・・・(T_T)
やりたいことは、購入した商品ごとにお客様名を入力
したいので
日時 部門 支払方法 金額 の4つをエクセルで整理し
名前の入力は手作業でする予定です。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 図書カードの分配 7 2023/05/09 15:57
- 簿記検定・漢字検定・秘書検定 簿記2級 表作成時の仕訳の問題 2 2022/07/07 18:15
- Excel(エクセル) アウトラインの小計のやり方 1 2023/03/20 11:51
- Excel(エクセル) SUBTOTAL SUMIF?? 2 2023/03/16 11:25
- 自動車ローン・自動車保険・車両保険 車の残価設定ローンの金利手数料について教えてください 5 2023/03/15 22:36
- システム CSVファイルのマッピング処理の省力化 1 2022/11/24 00:01
- 予備校・塾・家庭教師 【至急】塾講師の方、助けてください。 塾の問題集の答えが貰えません。 新中学二年生です。個人塾に通っ 1 2022/03/25 00:31
- Excel(エクセル) IF 関数で「〇〇 という文字を含む場合」の分岐処理で表示された数字はSUMで数字集計できますか? 3 2022/08/02 16:29
- デスクトップパソコン デスクトップpcを買います。 値段が妥当か見てください。 PC基本部 ESPRIMO WD2/F3 4 2022/05/14 06:58
- Excel(エクセル) 特定文字(数字)で行挿入、挿入された行で合計したい 2 2023/03/13 14:30
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルで最高値、最低値の日...
-
エクセルの列が左右逆に・・・・
-
エクセルの数式について教えて...
-
Excelの住所録を「あいうえお」...
-
アクセス2010クロス集計クエリ
-
パソコンで購入したデーターが...
-
「24日の0時」って・・・
-
エクセルのチェックボックスを...
-
「時間」、「期日」、「日付」...
-
エクセル マクロ 名前を付けて...
-
VBAでエクセルシートを更新...
-
回覧板の日付について質問です...
-
宀や广など、部首だけを入力す...
-
エクセルのセル内での改行(マ...
-
履歴書の日付間違いで落ちますか。
-
エクセルで数字から名前に変...
-
ACCESSで日付ごとに自動連番(...
-
エクセルで別シート、または別...
-
「3~4日」「3、4日」どう発...
-
エクセル マクロで指定日にメ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで最高値、最低値の日...
-
エクセルの列が左右逆に・・・・
-
エクセル・違う幅の列や行を複...
-
エクセル2007で1列おきに...
-
エクセルの列数を増やせますか...
-
powerpoint2000で表の列幅・行...
-
【マクロ】複数シートのデータ...
-
並び替え
-
Excel ある行と列が交わったと...
-
ワードで表を作った時
-
差込印刷 表に左列終了後右列...
-
エクセルについて詳しい人教え...
-
エクセルでの並べ替え
-
エクセル範囲指定に列見出しを...
-
Excelの住所録を「あいうえお」...
-
エクセルで複数のセルをランダ...
-
○○以上の合計
-
マクロでカウント
-
エクセルで流し込み印刷したい...
-
エクセルの数式について教えて...
おすすめ情報