nak777r の回答履歴
- エクセルの固定範囲にCSVを貼り付ける。
エクセルの固定範囲にCSVを貼り付ける。 作ろうとしているのは、エクセルで作られた勤務表など 貼り付けすべき範囲が固定されているエクセルシートに、 ユーザーが選択したcsvを貼り付けるマクロです。 ユーザーが開いているエクセルファイル(勤務表.xlsとします) に設置するボタンクリックイベントで、押下しますと 1.CSVファイルをユーザーが選択して開くことができ、 (選択したCSVファイルをsamp1.csvとします) 2.そのsamp1.csvをエクセルで開いた時の固定範囲(B3からE33、など)を、 元のエクセルファイル、勤務表.xlsの固定位置 (Sheet1のC6からH36、など)に貼り付ける。 そんなマクロを作りたいと思っています。 エクセルのマクロに触れ始めて3時間余り、 エクセルマクロ入門系サイトや、 CSV貼り付け等のキーワードで検索し 類似件より引用しながら組んでいるのですが 知識も理解もあやふやなまま(当然かもしれませんが)なかなか作れません。 本来ならば入門書等に書かれている内容を読み、 その上で参考サイトを見て理解する程度になり、 その上で判らなければこちらで質問すべきと理解しているつもりですが、 今日中にと急かされながら3時間経っても理解が進まず半ばパニックに陥っております。 半ば丸投げな質問である事は承知しておりますが、 よろしければご教授、 ないしは私が目的とするマクロの参考になるサイトを 紹介して頂けませんでしょうか? よろしくお願いします。
- ベストアンサー
- Visual Basic
- wendy0303
- 回答数2
- Visual Basic 6.0でWin32APIを用いてRS-232
Visual Basic 6.0でWin32APIを用いてRS-232Cで通信するプログラムを作っています。 CreateFile()でポートを開き、ハンドル番号を得て、プログラム終了前にそのハンドルを指定してCloseHandle()シリアルポートをクローズします。 ところが、何らかの原因でそのハンドルのクローズを行わなかった場合(例えば、デバッグ中にプログラムを終了させる)、シリアルポートは開っぱなしのようで、再度プログラムを実行しようとするとCreateFile()でポートを開くことが出来ません。 この状態は、VB6を再起動しない限り続きます。 そこでお聞きしたいのですが、プログラム上で、現在シリアルポートを開いているハンドル番号を知る方法はあるのでしょうか? 開いたときにメモするのも煩わしいため、なんとかならないかと悩んでいます。 どうぞよろしくお願いします。
- ベストアンサー
- Visual Basic
- noname#230227
- 回答数4
- AccessからExcelへエクスポート時に小数点以下の桁数がおかしく
AccessからExcelへエクスポート時に小数点以下の桁数がおかしくなります。 59.20 118.40 118.40 77.70 49.20 ↓↓↓↓↓ 59.20000076 118.4000015 118.4000015 77.69999695 49.20000076 の様になってしまいます。 以下エクスポート処理です。 StrSQL = "SELECT MaxSize FROM SizeTabel" ←本当はかなり長いSQL Set QueryTemp = CurrentDb.CreateQueryDef("ExportSQL", StrSQL) DoCmd.SelectObject acQuery, "ExportSQL", True DoCmd.TransferSpreadsheet acExport, 8, "ExportSQL", Application.CurrentProject.Path & "\test.xls", False, "" CurrentDb.QueryDefs.Delete ("ExportSQL") Format関数で桁数を調整したりはしたのですが、精度が必要な為、原因を追究したいと考えています。 アドバイスよろしくお願いいたします。
- ベストアンサー
- その他(プログラミング・開発)
- abuhiro
- 回答数2
- C言語 丸(●)の作り方
C言語で配列の中に●のデータを入れたいのですが ex) char BOX[6][6]={ {0,0,1,1,0,0}, {0,1,1,1,0,0}, {1,1,1,1,1,1}, {1,1,1,1,1,1}, {0,1,1,1,1,0}, {0,0,1,1,0,0}, } このように入れるためのプログラムが教えてほしいです
- 緊急です><
お伺いしたいことがあってこの質問版にきました。 人(自分)の身の回りで、プログラミングできるもの、出来ないものについて、実例を挙げてほしいのです。なんでもかまいません。ですがなぜそうなのかを教えてほしいです。 抽象的すぎて申し訳ありません>< ですが急いでいて・・すみません><
- 締切済み
- その他(プログラミング・開発)
- Core2Quad
- 回答数1
- なんでGoogleReaderって古い記事を読めるのですか?
タイトル通り、 なんでGoogleReaderって古い記事を読めるのですか? http://feeds.feedburner.com/hatena/b/hotentry 上記のページは、はてなブックマークの最新30件を取得できるページです。 RSSリーダーで記事を取得する場合は、上記のページに表示されている記事だけを読めるものだと考えているもので、 最新30件以上の記事を読み込めるGoogleReaderが不思議に思っています。 それなので、なんで最新30件以上の記事を読み込めるのでしょうか? どのようにして、上記のページ以外から読み込んでいるのでしょうか? 教えてください。宜しくお願いいたしますm(_ _)m
- 締切済み
- XML
- freestyle_
- 回答数1
- webインストールについて
どこのカテゴリに質問すれば良いのか分からなかったので、 このカテゴリに質問させて頂きます。 現在、私が管理している社内のみ閲覧できるホームページ上で社員向けにソフトウェアのインストールファイルをダウンロードできるように しているのですが、今後、ダウンロードをできない様にして、 ホームページ上のインストールボタンをクリックすると 直接インストールが開始され、クライアントのPCにはインストールファイルが保存されないようにしたいのですが、何か方法はありませんでしょうか? webインストール等の言葉で検索したりしているのですがよく分かりませんでした。 よろしくお願いします。
- マクロの変更の仕方を教えて下さい。
前任者の作ったエクセルの表を使っています。商品販売と計算の2種類のシートがあります。商品販売にはマクロに関係する集計とクリアの二つのボタンが作られてあります。教えて頂きたい何点かがあるのですが、最初にクリアのマクロの変更をお願いします。 商品販売のエクセルの行数を現在の300行から600行に増やしたいのです。エクセルの表は増やせるのですが、マクロは単に300の数字を600に訂正するだけでいいのか分かりません。是非教えて下さい。 Range("A6:B300,E6:E300,G6:G300,I6:I300").Select Range("I6").Activate Selection.ClearContents Sheets("計算シート").Select ActiveWindow.SmallScroll Doun:=-15 Range("T3:AI297").Select Selection.ClearContents ActiveWindow.SmallScroll Down:=-231 ActiveWindow.ScrollRow=55 ActiveWindow.ScrollRow=54 と55 54 53 52 49 46と数字が不規則に小さくなりながら続き、最後は3で終わり ActiveWindow.ScrollRow=3 Range("R2").Select Sheets("商品販売").Select Range("I1").Select ActiveWindow.ScrollRow=295 ActiveWindow.ScrollRow=294 と今度は295 294 292 291 288 285 279とまた数字が続き 最後は ActiveWindow.ScrollRow=6 Range("I2").Select End Sub ActiveWindow.ScrollRow= の数字の意味が全く分かりません。構わずに最初の300→600の訂正だけで大丈夫でしょうか?
- ベストアンサー
- オフィス系ソフト
- noname#194447
- 回答数4
- 美しいソースとは?
VBAを始めて1年ほどになります。 プログラム(マクロ?)を本格的に勉強したのは、これが初めてです。 いろいろ作ってきて毎度共通の悩みがあります。 ソースなんですが、なんというか、「美しくない」のです。 作っている時は良いのですが、数日経って修正が必要になった時などに、ソースを見るのが嫌で嫌でたまりません。 変数が少ないのかと変数だらけにしたら、それはそれで何をやっているか分からなくなってきましたし、変数を日本語にすれば分かりやすいかと試してみれば、日本語ってどうも黒い四角にしか見えなくてパッと見が分かりづらかったりと、どうもうまくいきません。 プログラムは人が読むことを前提に見やすく書くべしと聞きますが、自分でも見難いソースしか書けない自分が嫌になってきます(^_^; プロの方はいったいどういうところに気をつけて、読みやすいソースを書かれているのでしょうか? 美しいソースとはどういうものなんでしょうか? 一般論、個人的なこだわり、いろいろあるとは思いますが、よろしくお願いいたします。
- ベストアンサー
- その他(プログラミング・開発)
- noname#103379
- 回答数10
- iPhoneの動画キャプチャAPI
iPhoneのカメラを使って撮影した動画を、0.01秒ごとの静止画としてキャプチャし、取得した静止画を利用して画像処理を施すようなiPhoneアプリケーションの開発を考えているのですが、このように動画を静止画としてキャプチャするようなAPIは公開されているのでしょうか? もしくは、iPhoneで0.01秒ごとにカメラで連続写真を撮るといったプログラムは作成可能でしょうか? iPhone開発未経験なため、無知な質問お許し下さい。
- 締切済み
- その他(プログラミング・開発)
- miya-ken
- 回答数1
- 現時点でのWEB開発言語の比較
SEをやってますが、最近開発をした事がありません、 すみませんが最近の技術を教えて頂けませんか。 (個別では色々と情報がありますが、横並びで比較した情報が見当たらず、質問させて頂きました) 質問: 現時点でのWEBサイトを構築する為の言語の比較 (JAVAやASP.NET、Perl、PHP、Ruby、Pythonなど) 特に、開発工数(費用)と開発のし易さ等の良い点、悪い点、 また、どのフレームワークを使えば、どれだけ便利とか。 想定するWEBサイトは無しとしたいとこですが、それでは、余計に難しそうなので、 一般的なECサイトと一般的な製品検索サイト、社内向けの販売管理システムの3つで、 どの言語でどのフレームワークを使えば、どのシステムの開発に適している等、 教えて頂けませんか。 全部を回答して頂くのは大変と思いますので、解る範囲で部分的な回答でも構いません。
- ベストアンサー
- その他(プログラミング・開発)
- gogosurfin
- 回答数1
- Excel VBAで表のフォーマットを変えたい
表題だけでは判らないと思いますので、詳細に実現したいことを箇条書きにて説明いたします。 1.弊社では、電子スケジュール管理ソフトを使っています。 (WEBベースで、部内のメンバーの一週間分の行動が表示できます) 2.現在、その予定表を、女性事務員さんが、ブラウザ上でコピーして、Excelに貼り付け、職位順に並べ替えたり、空白行を削除したりしています。 3.今回の質問は、ブラウザからコピーするところまでは仕方ないとして、その後、決まったフォーマットに編集する作業をVBAを用いて簡便化してあげたいのです。 マクロも考えましたが、ソフトに登録されているスケジュールの数によって行数が変わるため、適していないと判断しました。 (注)当方、VBAの知識はほとんどありません。基本書を読んだくらいで、「ああ、こういうものか」という理解度です。 4.本題ですが、ペーストした状態は、図のとおりです。名前が結合されたセルの右に、一日毎の予定が入力されています。が、時間と予定の内容は別のセルに格納されています。 また、なぜか予定の一番上には空白セルが挿入されています。 5.これを、 日付 日付 日付 -------------------------------------------------------------- A氏|時間(セル内改行)|時間(セル内改行)| |予定(セル内改行)|予定(セル内改行)| |時間(セル内改行)| |予定(セル内改行)| -------------------------------------------------------------- B氏|時間(セル内改行)|時間(セル内改行)| |予定(セル内改行)|予定(セル内改行)| |時間(セル内改行)| |予定(セル内改行)| -------------------------------------------------------------- という風に、整理したいのです。 もっと欲を言えば、決められた順序に、名前で並べ替えたいです。 VBAの得意な方、いらっしゃいましたら断片的でも結構ですので、ご教授いただけませんでしょうか? どうぞよろしくお願いいたします。
- ベストアンサー
- その他MS Office製品
- camo-tech
- 回答数1
- VB6からのExcel起動について
環境は WindowsXpSp3 Excel2002Sp3,Excel2003 VB6Sp6 です。 上記環境下で以下のコードの違いがよくわかりません。 Main1,Main2,Main3 で設定、処理方法(コーディング)、動作、終了(Excelオブジェクトの)の方法等で気をつけなければならないものが変わるのでしょうか。 もう一つ、 Set xlWorkbooks = xlApp.Workbooks についてですが、こちらは Set xlWorkbooks = new xlApp.Workbooks とするとエラーになります。 (Set xlApp = Excel.Application は New があってもなくてもエラーは出ません) この理由もわかりません。 インターネット上で色々検索はしてみたのですが、よくわかりませんでした。 ご存知の方、よろしくお願いいたします。 ------------------------------------------- Global xlApp As Excel.Application Global xlWorkbooks As Workbooks sub Main1() Set xlApp = Excel.Application Set xlWorkbooks = xlApp.Workbooks end sub sub Main2() Set xlApp = new Excel.Application Set xlWorkbooks = xlApp.Workbooks end sub sub Main3() set xlApp = CreateObject("Excel.Application") Set xlWorkbooks = xlApp.Workbooks end sub -------------------------------------------
- ベストアンサー
- Visual Basic
- elec2
- 回答数4
- 郵便番号住所変換について
弊社ホームページのお問い合わせメールフォームで、住所入力補助としてサガンネットの「郵便番号住所変換サービス」(http://www.saga-n.net/z2a.html)を利用させていただいています。 お客様からのメールで、この変換がうまく機能していないものが見つかり、調べましたら、ブラウザによって可・不可になることがわかりました。 InternetExpiorer7 ○ GoogleChrome × Firefox × Lunascape5 ○ 全てのブラウザに対応するには、どのようにすればよいのでしょうか。 または、他の変換システムでもいいですから教えてください。 どうぞ、宜しくお願いいたします。 OSはXPです。
- ベストアンサー
- その他(プログラミング・開発)
- junjunjujujun
- 回答数3
- 貧相なページをキレイなデザインにしたいです!
とりあえずCSSを使用したページを作りました。 XHTMLや基本的なCSSの知識はありますが、デザイン心がまったくありません。 http://designcss.masa-mune.jp/css.html メニューや背景に画像を指定して見栄えの良いページにしたいです。 デザインのテクニックやサンプル(ソース)が豊富に紹介されている書籍を教えて下さい。 経験のある方なら上記のアドレスを見て、何が足りないかすぐに分かると思いますので、 こんな本を読んだら良いよ、というアドバイスでも頂きたいと思います。 宜しくお願いします。
- ボタンを画像に変更したい
iframe内のコンテンツを親からスクロールさせる URLを参考に http://moto-mono.net/2009/07/10/scroll-content-is-contained-in-iframe.html のデモのように、なんとか出来ましたが、ボタンを押下して上下のスクロールしているので、画像を配置し、上下にスクロールできるようにしたいのです。 <input type="button" id="down" value="↑" /> <input type="button" id="up" value="↓" /></p> ↓とやってみたのですが出来ませんでした。 <img id="up" src="up.jpg" alt=""> <img id="doun" src="doun.jpg" alt=""> ボタンでなければ、出来ないのでしょうか? 出来なければ、ボタンを画像のように見せる方法はありますか?
- ベストアンサー
- JavaScript
- fukoto
- 回答数3
- 社内専用システムへエクセルのデータを貼り付けたい
社内専用システム(おそらくイントラネットかと思います)へ、エクセルのE5セルにあるデータを貼り付けたいのです。 社内専用システム画面には入力エリアが複数ありますが、その3番目の入力エリアに貼り付けたいのです。 エクセルにてE5を選択 ⇒「Ctrl+C」 ⇒社内専用システム画面をアクティブにする ⇒3番目の入力エリアをマウスにて選択して「Ctrl+V」 または、 エクセルにてE5を選択 ⇒「Ctrl+C」 ⇒社内専用システム画面をアクティブにする ⇒「Tab」 ⇒「Tab」 ⇒「Ctrl+V」 にて3番目の入力エリアに貼り付けることはできるのですが、 「3番目の入力エリアをマウスにて選択」又は「Tab」「Tab」の作業を抜かして、 エクセルにてE5を選択 ⇒「Ctrl+C」 ⇒社内専用システム画面をアクティブにする ⇒「Ctrl+V」 のみで3番目の入力エリアに貼り付けることは出来ないでしょうか? 何千回と行う作業ですので「3番目の入力エリアをマウスにて選択」又は「Tab」「Tab」の作業を抜かして行いたいのです。 社内専用システムのことですので、確かな回答はできかねるかと思います。「これでできませんか?」レベルでかまいませんので、回答していただけると助かります。 よろしくお願いいたします。
- 締切済み
- オフィス系ソフト
- mako27mako
- 回答数8
- 社内専用システムへエクセルのデータを貼り付けたい
社内専用システム(おそらくイントラネットかと思います)へ、エクセルのE5セルにあるデータを貼り付けたいのです。 社内専用システム画面には入力エリアが複数ありますが、その3番目の入力エリアに貼り付けたいのです。 エクセルにてE5を選択 ⇒「Ctrl+C」 ⇒社内専用システム画面をアクティブにする ⇒3番目の入力エリアをマウスにて選択して「Ctrl+V」 または、 エクセルにてE5を選択 ⇒「Ctrl+C」 ⇒社内専用システム画面をアクティブにする ⇒「Tab」 ⇒「Tab」 ⇒「Ctrl+V」 にて3番目の入力エリアに貼り付けることはできるのですが、 「3番目の入力エリアをマウスにて選択」又は「Tab」「Tab」の作業を抜かして、 エクセルにてE5を選択 ⇒「Ctrl+C」 ⇒社内専用システム画面をアクティブにする ⇒「Ctrl+V」 のみで3番目の入力エリアに貼り付けることは出来ないでしょうか? 何千回と行う作業ですので「3番目の入力エリアをマウスにて選択」又は「Tab」「Tab」の作業を抜かして行いたいのです。 社内専用システムのことですので、確かな回答はできかねるかと思います。「これでできませんか?」レベルでかまいませんので、回答していただけると助かります。 よろしくお願いいたします。
- 締切済み
- オフィス系ソフト
- mako27mako
- 回答数8
- VBAでIEオブジェクトを呼ぶとアドレスバーが出ません
初めて投稿します。 会社でインターネットの自動ログインのマクロを組みました。 ネットで調べても分からずお手上げ状態です↓ ・マクロで新しくインターネットを開くと、アドレスバーなどが消えて開くようになり、プライバシーの鍵のマークが表示されなくなりました。 先週まではうまく表示されていたのですが、共有のPCなので誰がいつ使ったか分かりません。 インターネットオプションや参照設定など見た限りでは変更されていないようでした。 何か原因に心当たりのある方いらっしゃいましたら、ご教授いただければ幸いです。 参考にマクロを載せておきます(うろ覚えですが…)。 Sub test() Set ie = CreateObject("InternetExplorer.application") ie.Visible = True ie.Navigate ("http://www.google.co.jp/") ……省略…… End Sub