hoiho160000のプロフィール
- ベストアンサー数
- 11
- ベストアンサー率
- 15%
- お礼率
- 0%
- 登録日2010/10/16
- VBAでどうしてもコーディングができず、ヒントをもらえたらうれしいです
VBAでどうしてもコーディングができず、ヒントをもらえたらうれしいです。 (VBA超初心者で、ネットのエクセルVBAなどを参考にしているのですが、なかなかわからず。。。) 【csvファイルを指定して、1行目から7行目までを削除する】というプログラムがくみたいです。 Sub TQT() Dim PathName As String Dim FileNam As String Dim xlAPP As Application Dim ABC As Workbook Application.DisplayAlerts = False Set xlAPP = Application PathName = xlAPP.GetOpenFilename("CSV形式ファイル(*.csv;),*.csv;", 1, "開きたいファイルを指定してください。") Set ABC = ThisWorkbook FileNam = Dir(PathName) Set ABC = Workbooks.Open(PathName) ABC.Activate Workbooks.Open FileNam = PathName '行を削除 activeWorkbooks(ABC).worksheets("sheet1").Row("1:7").delete ←※ MsgBox "done" End Sub ※のところでデバッグが止まってしまいます。 activeworkbookの書き方が間違っているのか、 そもそもそれ以前に間違いがあるのか、 わかる方がいたら教えてください。 ※の行を色々アレンジしてみたのですが、うまくいきません。 よろしくお願い致します。(excel2003)
- 締切済み
- その他(プログラミング・開発)
- Gcomachi
- 回答数1
- 家電大型量販店での値引き交渉のやり方
家電大型量販店での値引き交渉のやり方 今度、家電大型量販店で買い物をします。 その際、値引き交渉をしたいのですが、どのようにやれば快く値引きしてくれるでしょうか? 私の父が交渉が上手い(強引?)のですが、今回の買う物は女性用の美容商品なので私だけで買い物に行きます。 父の交渉を見習えば良いのでしょうが、あまりに強引過ぎて恥ずかしくなってしまうほどです。 デジカメを買った時は値引きさせたうえにメモリーカードとノベルティグッズまで付けさせてました(><) 逆に私は気弱で表示価格通りに買ってしまう様な性格です・・・ ただ、「もう少しお安くなりませんか?」と聞けば良いのでしょうか? 一応、他店の価格も調べておいて「他の店はもっと安かったですよ」と交渉した方が良いのでしょうか? 上手い交渉の仕方がありましたら、宜しくお願い致します!!
- ベストアンサー
- その他(生活家電)
- noname#131167
- 回答数5
- ごみ収集の違反で困っています。我が家の前が収集場所になっているのですが
ごみ収集の違反で困っています。我が家の前が収集場所になっているのですが、分別も時間も守らず捨てていく人が多くて困っています。何か良い解決策がありましたら回答をお願いします。
- ベストアンサー
- その他(暮らし・生活お役立ち)
- mirukumiya
- 回答数7
- オール電化のワンルーム(中古)
オール電化のワンルーム(中古) 20年落ちのワンルームの購入を検討しています。 オール電化ですが20年前のものでした。 買い替えが必要かどうかも範疇に入れて 購入金額を提示しようと思いますが、 20年前の室内据え置型の電気温水器はどうですか? たとえば「150lでは不便」 とか、「こんなところが気になる」 など実際に住まれた方(住んでいる方) また、家主(投資家?)の方など ご意見を参考にしたくお願いします。 今ではすっかりおなじみですが なにぶん古いオール電化ということ、 ワンルームにもgoodなものか、 ぜひ知りたいです。