Wendy02 の回答履歴
- エクセル VBAの修正箇所について
エクセル VBAの修正箇所について 物品配送関係の管理表を作成中ですが、一部VBAの動作を下記のように修正するにはどこを修正したらよろしいでしょうか? サンプルファイル(エクセル2003で作成)をアップロードしましたので、宜しくお願い致します。 http://www.filebank.co.jp/filelink/9315d83f25575cce44fad4fea1d0cf38 VBAの動作を簡潔にご説明しますと、 各営業所毎に、決められた個数の物を箱詰めして送付しています。 例えば、1営業所への送付個数120個、ダンボール1箱の入り数50個だった場合、 20個、50個、50個の合計3箱のダンボールを送付するということになります。 それをVBAにて処理できるように作成中です。 加工前シートの実行ボタンをクリックすると、加工後シートに反映されるようにしています。 ■修正箇所1 「箱内数量」の計算がうまくいきません。 例えば、送付個数150個、ダンボール1箱の入り数50個だった場合、 本来なら、50個、50個、50個の合計3箱になってほしいのですが、 どういうわけか、0個、50個、50個になってしまいます。 ただし、送付個数120個、ダンボール1箱の入り数50個のように端数が出る場合は、 20個、50個、50個と正常に計算されます。 ■修正箇所2 「箱連番(営業所毎)」の列は、その名の通り営業所毎に送付する箱に連番を振ってるのですが、数字が降順ではなく昇順になるようにしたいです。 以上、2箇所の修正点ご教示いただきたく思います。 どうか宜しくお願い致します。
- 目が悪い人は眼鏡をかけないでいると、よけいに悪くなるのですか?
目が悪い人は眼鏡をかけないでいると、よけいに悪くなるのですか? =質問1= 目が悪い女子です。 PCをよくやるので、視力がものすっごい下がっているのですが、 PCをやる時、「眼鏡をかけてやる」のと「眼鏡をかけないでやる」のと、 どちらの方が視力低下の進行が早いですか? 右は0・3 左は0・2 です。 普段は眼鏡はかけていません。 似合わないって言うのと、かけると目がよけいに悪くなりそうなのが理由です。 =質問2= 視力ってあがったりしますか? 毎日「視力が上がる目の運動」をやったり「ブルーベリー」を食べたりしていますが、 まったく効果が得られません。 PCのほかにもゲーム(PSPやDS)をやったり、 PSPの小さい画面でテレビを毎日見たりしています。 大きいテレビを見ることは・・・まぁ~ありませんが、 見るときは必ず部屋を明るくして、離れてみているようにしてます。 ボヤけてて、見づらいので涙が目から出ますが。 =質問3= ゲーム(PSP)をするとき、 目がよくなるという「ダイソー」で買った黒い眼鏡で、 穴がたくさん開いた物をかけながら見ていますが、 この眼鏡をかけながらゲームやPCをするのって目がよけいに悪くなるのでしょうか? 教えてください。 よろしくお願いします(^^)
- ベストアンサー
- その他(生活・暮らし)
- qwertyuyuy
- 回答数3
- 現在、平岡の新高1に通っていて宿題はこなしているのですが、復習ができて
現在、平岡の新高1に通っていて宿題はこなしているのですが、復習ができていません。 このままで大丈夫なのでしょうか? しっかり宿題と暗記をやれば大丈夫と言われているのですが・・・
- エクセル起動時に、オートオープンマクロでもう一つのエクセル(以下『マス
エクセル起動時に、オートオープンマクロでもう一つのエクセル(以下『マスタ情報』と表示)が 連動して起動するように設定をしているのですが、この『マスタ情報』のエクセルが起動している 事実をユーザーに秘密にしておく設定は可能でしょうか?(保存先を知らせたくないためです) ActiveWindow.Visible = False 『マスタ情報』のエクセルをアクティブにして上記のマクロ構文を付け加えれば確かにウィンドウが 非表示にはなるのですが、ユーザーにツール『ウィンドウ』の『再表示』メニューをクリックされて しまうと、せっかく非表示にした『マスタ情報』のエクセルが再表示されてしまいます。 Sheets(1).Visible = xlVeryhidden ユーザーに再表示させたくない対象のオブジェクトがシートの場合であれば、上記のマクロ構文で 解決できるのですが・・・ ActiveWindow.Visible = xlVeryhidden 上記マクロ構文を試してみたところ、エラーは発生しなかったのですが『マスタ情報』のエクセルは 非表示に設定されることなくマクロの処理が終了してしまいました。ブック(ウィンドウ)を完全に 非表示にする方法をご存知の方、是非教えて頂けますよう宜しくお願いします。
- ベストアンサー
- Visual Basic
- excuse-me
- 回答数2
- VBSでCDトレイのオープン/クローズのコーディング方法わかりません。
VBSでCDトレイのオープン/クローズのコーディング方法わかりません。 Excel for VBA では出来ましたが、VBSで作りたいのです。 http://www.mhl.janis.or.jp/~winarrow/vbscript/htm/vbs230.htm を見ると、VBSではDeclareが使えないようですね。 やり方がわかる方がいましたら、よろしくお願いします。 ----------- [Excel for VBA] Public Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpSectorsPerCluster As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long Sub CD_Open() Ret = mciSendString("set cdaudio door open", vbNullString, 0, 0) End Sub Sub CD_Close() Ret = mciSendString("set cdaudio door closed", vbNullString, 0, 0) End Sub -----------
- 締切済み
- Visual Basic
- kwang0205
- 回答数2
- 中国語版のMS Officeで日本語入力ができなくなってしまいました。
中国語版のMS Officeで日本語入力ができなくなってしまいました。 中国語版のWinXPを使用しています。(中国で修理に出したら中国語版になってしまった) 日本語の入力が不調だったので「地域と言語」にあたる設定(表記は中国語になります)から「日本語」(言語)と「日本」(地域)を選択しましたら、ブラウザの日本語入力環境は改善したのですが、MS Officeの日本語入力ができなくなってしまいました。 言語バーは出ています。JPを選択してもIMEのアイコンが表示されません。 中国語は入力できます。 どうしたらよいのでしょうか?(泣)
- ベストアンサー
- その他MS Office製品
- shuwa_i
- 回答数3
- 重要だけど 中学の英語ではあまり出てこないような単語や表現。
重要だけど 中学の英語ではあまり出てこないような単語や表現。 こんにちは。毎度つまらない質問です。中学の英語は一通り重要な単語や表現はカバーしていますが、それでもあまり登場しない単語や表現がありますよね。 例えば、nasty。goodの反対がbadなら、niceの反対はnastyですが、中学はおろか高校の教科書にも出てこなかったような記憶があります。 次に、recognize。 例えば、 "I saw him, but he didn't recognize me."という文なら 中学の英語では 後半の部分は " but he didn't undestand who I am."とかに言い換えるんだろうか.... それから、prefer。これはことごとく like betterに言い換えられます。これも、中学では難しい単語と位置づけ、比較級の練習も兼ねて like betterで代用するんでしょかね。 例えば、"I prefer beef."と “I like beef better."では 時として大きなニュアンスの差も出てきます。 そこで質問です。このように、他にも重要でありながら 中学の英語では取りこぼしやすい単語や表現がありましたら、どんどん挙げてください。
- 「本製品は1つの製品として許諾されています。
「本製品は1つの製品として許諾されています。 その構成部分を分離して複数のコンピューターで使用することはできません。」 Ofiiceのパッケージに↑のような内容が書いてあります。 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 聞きたいのは、自分のAパソコンにインストールした後、(認証も無事完了です。) 自分のもう一つBパソコンにインストールしようとしたら、認証ができませんでした。 それで、認証できたAパソコンからOfiiceをアンインストールして、 再度Bパソコンにインストールをしましたが、やはり認証ができませんでした。 質問ですが、一回、Aパソコンに一回インストールし、Aパソコンから認証したから、 永遠にAパソコンからしか認証できないでしょうか? もし、AパソコンからOfiiceを削除して、ほかのパソコンにOfiiceインストールして利用したいとき 認証はどうしたらいいでしょうか? よろしくお願いします。
- 締切済み
- その他MS Office製品
- sapphirejp
- 回答数4
- ご回答お願いします。バッチファイルの下記方法がどうしてもうまくいかない
ご回答お願いします。バッチファイルの下記方法がどうしてもうまくいかないので、助けてください。 Aフォルダは残したまま、Aフォルダ内にあるフォルダのみ、Bフォルダに移動したいと思っております。移動後はAフォルダ内にあるフォルダは削除します。バックアップがしたいのですが・・・。 1、Aフォルダ内のフォルダは、様々なデータを保存していますのでフォルダ名がすべて違います。 2、moveを使ったのですが、Aフォルダごと移動してしまい、Aフォルダが消えてしまいます。 どうかご協力お願い致します。
- 締切済み
- その他MS Office製品
- chevrolet0713
- 回答数2
- ExcelVBAのSub名で和文使用制限はバージョン97~2007どこ
ExcelVBAのSub名で和文使用制限はバージョン97~2007どこまでになっていますか? 1)Excel97当初は和文のサブルーチン名が使用できたのですが,アップデートが進みExcel2000の段階ではカナ文字のサブルーチン名に文字落ちや化けが発生するようになり,カナ文字は漢字に直しました。 2)社内でExcel2000~Excel2007使用環境でExcel2002開発のものを動作約一ヶ月で,「オートメーションエラー」が発生してしまいました。 3)和文名は大量に使っており,修正が大変です。オートメーションのActive_X関係は何とか修正しましたが,Excel2000~Excel2007で使用するには全ての和文名を英文名に修正しなければならないか,どなたか教えて下さい。
- 締切済み
- その他MS Office製品
- createtim
- 回答数5
- エクセルの起動エラー
エクセルの起動エラー ツールバーの復帰は参考にさせて頂き見事に復帰でき、ありがとうございました。 別の方法を試みておりました( 検索で *.xlb を捜し削除してみてください。) 現在エクセルを起動しますと「C:\Program Files\Microsoft Office\OFFICE11\Library.FUNCRES.XLA」が見つかりません。と確認ボタンが表示され、”OK”で閉じますと通常の新規ファイルが表示できます。 そこで、テキストを作成しC:\Program Files\Microsoft Office\OFFICE11\Library\FUNCRES.XLSとして保存しましたら、今度はシートに「FUNCRES」として起動します。 これをなんとか以前のように新規起動したらSheet1 Sheet2 Sheet3で起動できないでしょうか。
- VBAで二重起動を防止したいのですが、
VBAで二重起動を防止したいのですが、 いろいろ調べましたが、わかりませんでした。 なにかいい方法はないでしょうか? EXCELで見積書を作成して、そのファイルをVBAで保存するとき、ついでに、Outlook予定表に見積り期限日予定を入れるものです。 ファイル保存コード省略 Flnm=パス 'ここからアウトルック操作 Dim oApp As Object Dim myNameSpace As Object Dim myFolder As Object Dim objITEM As Object 'outlook 起動 Set oApp = CreateObject("Outlook.Application") '既に起動してても新規起動 Set myNameSpace = oApp.GetNamespace("MAPI") Set myFolder = myNameSpace.GetDefaultFolder(9) '起動時フォルダーを指定 myFolder.Display 'アイテムの作成 Set objITEM = oApp.CreateItem(1) '予定表作成画面を指定 objITEM.Display '編集画面を表示 '予定表内容 objITEM.Subject = "見積り発行後のフォロー" '件名 objITEM.body = "見積り発行から3ヶ月経ちました" '本文 objITEM.Attachments.Add Flnm 'ファイルの添付 objITEM.Start = DateAdd("m", 3, Date) & " 8:30" '予定日と開始時間 objITEM.Save '保存 objITEM.Close 2 '閉じる EXCEL2007とOutlook2007を使用しています。 1.多重起動しないことと 2.起動中で最小化されたOutlookがあるならアクティブ化して予定を入れる、または 3.起動していなかったら起動させて、予定を入れる と云うことがやりたいのですが・・・
- ベストアンサー
- その他MS Office製品
- karacom
- 回答数4
- Wordで複数の単語を一括置換するマクロはありませんか?
Wordで複数の単語を一括置換するマクロはありませんか? 産業翻訳をしています。 現在は、テキスト文書に対し、手作業では不可能な大量の単語を、自作の辞書を使って一括置換しています。 水野麻子さんのブログhttp://ameblo.jp/saglasie/entry-10519224366.htmlによると、 この作業をWordでできて、さらに置換部分をハイライト表示したり、置換した単語のリストが自動的に作成されるマクロがあるようなのですが、ネット上で検索しても見つかりません。 無料公開はされていないのでしょうか? こうした一括置換機能はどんなソフトにも標準装備されている、といった記述もネット上で見つかるのですが、どこにあるのかわかりません。 簡易版なら同サイトで公開されていますが、ハイライト表示やリスト自動作成は付加されていません。 もし無料公開がないのでしたら、このマクロの電子版や本の購入も考えています。 このマクロの入手経路をご存知の方おられませんか?
- ベストアンサー
- その他MS Office製品
- chuys
- 回答数7
- 注意力・判断力・注意力の衰えを防ぐにはどうしたらいいでしょうか?
注意力・判断力・注意力の衰えを防ぐにはどうしたらいいでしょうか? 52才、女性です。新しい仕事に就いて2週間経つのですが、中々仕事が覚えられず、同じ事を何度も聞いている始末です。そのうえ、商品を落としたりして台無しにしてしまいました。接客・電話応対も臨機応変に対応できずにオロオロしてしまいます。電信伝送入力の仕事もあるのですが、こちらは絶対に間違えてはいけない内容なのでまだ1人で対応していないのですが、ゆくゆくは1人でやらなければなりません。でも、きっと間違えてしまうきがしてなりません。上司や年下の先輩からは「がさつなところがあるから、注意してください。」「ほんとうに丁寧にやってください」「こころしてやってください」などと毎日のように叱責を受けてばかりです。自分が悪いので努力をしなければならないのですが、2週間足らずで既に仕事に行くのが憂鬱になってしまってます。 以前はここまでひどくなかったと思うのですが、とにかく一つのことをやり遂げるのに以前より倍の時間がかかるし、「えっ、何で?!」と自分でも何でこんなことをしてしまったのかわからないことが度々あるのです。 なにかよい対処法がありましたら、教えていただけますでしょうか?
- ベストアンサー
- その他(生活・暮らし)
- bijoumoon
- 回答数3
- Wordで複数の単語を一括置換するマクロはありませんか?
Wordで複数の単語を一括置換するマクロはありませんか? 産業翻訳をしています。 現在は、テキスト文書に対し、手作業では不可能な大量の単語を、自作の辞書を使って一括置換しています。 水野麻子さんのブログhttp://ameblo.jp/saglasie/entry-10519224366.htmlによると、 この作業をWordでできて、さらに置換部分をハイライト表示したり、置換した単語のリストが自動的に作成されるマクロがあるようなのですが、ネット上で検索しても見つかりません。 無料公開はされていないのでしょうか? こうした一括置換機能はどんなソフトにも標準装備されている、といった記述もネット上で見つかるのですが、どこにあるのかわかりません。 簡易版なら同サイトで公開されていますが、ハイライト表示やリスト自動作成は付加されていません。 もし無料公開がないのでしたら、このマクロの電子版や本の購入も考えています。 このマクロの入手経路をご存知の方おられませんか?
- ベストアンサー
- その他MS Office製品
- chuys
- 回答数7
- 早起きするコツを教えてください!
早起きするコツを教えてください! 私はいつも8時とか10時とかに起きちゃう人間なんですが、今度、用事があって5時起きをしないといけません。 なので今週は起きる習慣をつけようと思って6時、6時10分、6時30分、7時・・・とアラームをセットしたのですが、全く起きませんでした・・・。 あと、早く寝ればいいと聞きますが、私は24時以降じゃないと寝れません。(ラジオを聴くので。)これだけははずせません。録音とかもできないし・・・ 今のところは、前日にお昼ねして、夜寝れば起きられるかな・・・なんて思ってますが;; 寝坊だけは本当にしたくないので、本当にお願いします!!! ちなみに今週の日曜日なので、急ぎ目に募集します!!!
- 締切済み
- その他(生活・暮らし)
- noname#158507
- 回答数4
- エクセルの機能について
エクセルの機能について エクセル初心者です。 現在会社で利用しているエクセルの機能が不明でネットで調べたのですが わかりません。 (作成した人は退社した為、作成方法については調べる事ができませんでした) リスト形式で社員名を選択すると、部署名、所属長の名前が任意のセルに自動 入力される様になっているのですが、この機能は関数もしくはVBA、マクロで くまれている物なのでしょうか? 要はどういった物かわかれば、新入社員がふえた為、追記したいのですが どこをいじればいいのか不明なのです。 関数であれば、別シートに社員名とか記載されているはずですが、 見当たりません。 つたない文章で伝わりにくい部分もあるかと思いますが、ご教授お願いします。
- 締切済み
- その他MS Office製品
- su-chan01
- 回答数3
- ExcelVBAでの文字列置換について
ExcelVBAでの文字列置換について ExcelVBAは全く初心者のですが、下記の処理を早急に行う必要があり、質問させていただきます。 物品の使用者をエクセル管理しています。 シート1のA列に物品名、B列に現使用者名を入力しています。(約2000件) 一部の使用者に変更があった場合に、シート2に振替リストを シート2 A列=現使用者 B列=新使用者 と作成しています。 シート1のB列:現使用者から、シート2のA列:現使用者と同一な文字列を検索し、シート2B列:新使用者に置換するマクロはどのように書けばよいのでしょうか? 可能であれば、シート2のC列に置換結果を表示させたいです。
- ベストアンサー
- その他MS Office製品
- somo_seppa
- 回答数4
- Wordで複数の単語を一括置換するマクロはありませんか?
Wordで複数の単語を一括置換するマクロはありませんか? 産業翻訳をしています。 現在は、テキスト文書に対し、手作業では不可能な大量の単語を、自作の辞書を使って一括置換しています。 水野麻子さんのブログhttp://ameblo.jp/saglasie/entry-10519224366.htmlによると、 この作業をWordでできて、さらに置換部分をハイライト表示したり、置換した単語のリストが自動的に作成されるマクロがあるようなのですが、ネット上で検索しても見つかりません。 無料公開はされていないのでしょうか? こうした一括置換機能はどんなソフトにも標準装備されている、といった記述もネット上で見つかるのですが、どこにあるのかわかりません。 簡易版なら同サイトで公開されていますが、ハイライト表示やリスト自動作成は付加されていません。 もし無料公開がないのでしたら、このマクロの電子版や本の購入も考えています。 このマクロの入手経路をご存知の方おられませんか?
- ベストアンサー
- その他MS Office製品
- chuys
- 回答数7