mimeu の回答履歴

全131件中121~131件表示
  • Excelで組んだVBAプログラムと同等の事をExcel無しで動作させるには?

    よろしくお願いします。 現在、EXCELのVBAでプログラムを組み、 それをEXCEL上で使っているのですが、 他のプログラミング言語や.NET Frameworkなどを使い、 同等のプログラムソフトをEXCEL無しで組む事は 難しいのでしょうか? もちろん、技術的には可能であると理解していますが、 プログラミングの技術がVBA初級レベルしかない自分が 組めるのかどうか、その点がわかりません。 漠然とした質問内容ですが、 やりたい事はセルを参照した自動計算が中心になります。 大変お手数ではありますが、ご回答よろしくお願い致します。

  • accessで困っています

    access2000で、簡単な在庫管理ソフトを作っています。 商品マスタ(商品No、商品名、在庫初期値) 入荷マスタ(日付、商品名、入荷数) 出荷マスタ(出荷履歴No、日付、得意先名、商品名、出荷数) をテーブルに設け、商品を出荷入力すれば、初期値ー出荷数+入荷数をクエリ上で計算し、在庫数とし表示させています。 これに、出荷入力をしてそれを納品書として印刷させます。当たり前ですが、1商品出荷につき1枚の納品書しか印刷されません。 商品マスタに、商品名2や商品名3を設け、1枚に3種類まで印刷させようとすると、在庫計算方法がよく分からなくなります。 初心者で、どの様に作っていけば良いのかわかりません。 皆様のお知恵をお貸しいただけますでしょうか。 宜しくお願い致します。

  • ACCESSのネットワーク環境でMDBが起動しない

    こんにちは。 ご覧下さりありがとうございます。 ACCESS2007のランタイムがインストールされているパソコンを使い、ネットワークドライブ上にあるMDBファイルのショートカットをWクリックで起動させるという使い方をしています。 ネットワーク(LAN)には全部で3台のPCが接続されています。 この場合、そのMDBが他のどのパソコンからも開かれていない場合は正常に起動するのですが、他のどちらかのパソコンからすでに起動されている場合は開く事ができません。 Wクリックすると一瞬カーソルが砂時計になるだけで終わりです。 他のパソコンが開いていても関係なく開けるようにする方法はあるでしょうか? 以前の環境では問題なく開けていました。 以前の環境(正常起動する環境) OS:WINDOWS XP Home PC:FMV DESKPOWER RAM256MB ACCESS 2003 フルセット版インストール(非ランタイム) 新しい環境(正常起動しない環境) OS:Windows7 Home Premium PC:EPSON RAM1GB ACCESS2007 ランタイム MDBはACCESS2000形式で、パソコンを交換する前後で変更はありません。

  • 【Word VBA】フッター内のページ番号の位置を移動...

    【Word VBA】フッター内のページ番号の位置を移動...  今晩は,質問させていただきます.どうぞよろしくお願いいたします. Word2003もしくはWord2007でございます.  なんとかVBAでフッター内のページ番号挿入までできるように なったのですが,位置移動する方法がわかりません... Word2007の場合,フッターダブルクリック         →ページ番号クリック(点線の四角形が表示される)         →そのままドラッグ という動きになりますが,VBA自動記録時にはフッターを 触れなくなってしまいますので,コードが分かりません....  もしお詳しい方がいらっしゃいましたら,是非ともアドバイス いただけないでしょうか...どうぞよろしくお願いいたします.

    • MKT_
    • 回答数2
  • 【Word VBA】フッター内のページ番号の位置を移動...

    【Word VBA】フッター内のページ番号の位置を移動...  今晩は,質問させていただきます.どうぞよろしくお願いいたします. Word2003もしくはWord2007でございます.  なんとかVBAでフッター内のページ番号挿入までできるように なったのですが,位置移動する方法がわかりません... Word2007の場合,フッターダブルクリック         →ページ番号クリック(点線の四角形が表示される)         →そのままドラッグ という動きになりますが,VBA自動記録時にはフッターを 触れなくなってしまいますので,コードが分かりません....  もしお詳しい方がいらっしゃいましたら,是非ともアドバイス いただけないでしょうか...どうぞよろしくお願いいたします.

    • MKT_
    • 回答数2
  • エクセルの関数で「最新の結果」を反映させるためには

    エクセルの関数で「最新の結果」を反映させるためには エクセルで、架電結果を記録してます。 例えば、エクセルの一行目に残す記録の内容に対する各列の項目は下記のとおり。 A列 会社名 B列 電話番号 C列 代表社名 D列 ●月●日分コール結果 E列 架電時間帯 F列 備考 G列 ●月●日分コール結果 H列 架電時間帯 I列 備考 J列 ●月●日分コール結果 ・ ・ ・ というようにシートに記録が残ってます。その中で、「コール結果」の項目は、1~16のコール結果をプルダウンメニューで 選択することが出来ます。今回、このコール結果の「最新の結果」を同じシートの別セルに作成して自動的に反映させようとしております。しかしながら、関数等の知識がなく、大変に苦戦しております。 「●月●日分コール結果」は、「D列、G列、J列、M列・・・・・」というように2列飛ばしで結果が出ております。 現在は5900行(5900社のリストの社名やらコール結果やら出ております。)、HH列までエクセルのシートに結果が反映されてます。「最新の結果」はHK列に作成しようと考えております。 HK列に今までの「●月●日分コール結果」の中の「最新の結果」をどういう関数式で持って組めばいいのか。 素人なので、すみませんがご教示をお願いしたく存じます。

  • エクセルの関数で「最新の結果」を反映させるためには

    エクセルの関数で「最新の結果」を反映させるためには エクセルで、架電結果を記録してます。 例えば、エクセルの一行目に残す記録の内容に対する各列の項目は下記のとおり。 A列 会社名 B列 電話番号 C列 代表社名 D列 ●月●日分コール結果 E列 架電時間帯 F列 備考 G列 ●月●日分コール結果 H列 架電時間帯 I列 備考 J列 ●月●日分コール結果 ・ ・ ・ というようにシートに記録が残ってます。その中で、「コール結果」の項目は、1~16のコール結果をプルダウンメニューで 選択することが出来ます。今回、このコール結果の「最新の結果」を同じシートの別セルに作成して自動的に反映させようとしております。しかしながら、関数等の知識がなく、大変に苦戦しております。 「●月●日分コール結果」は、「D列、G列、J列、M列・・・・・」というように2列飛ばしで結果が出ております。 現在は5900行(5900社のリストの社名やらコール結果やら出ております。)、HH列までエクセルのシートに結果が反映されてます。「最新の結果」はHK列に作成しようと考えております。 HK列に今までの「●月●日分コール結果」の中の「最新の結果」をどういう関数式で持って組めばいいのか。 素人なので、すみませんがご教示をお願いしたく存じます。

  • シートAとシートBの得意先コードが一致したら、該当行をシートCにコピー

    シートAとシートBの得意先コードが一致したら、該当行をシートCにコピーするVBAを組みたいのですが、上手く行きません。加えてシートAの該当行は削除しておきたいです。 XPでExcel2003を使用しています。 Const strMasSheet = "A" Const strMasSheet2 = "B" Const strSrhSheet = "C" Dim strSrhCode As Long 'シートAの得意先コード Dim strSrhCode2 As Long 'シートBの得意先コード Dim intRow As Long Dim intRow2 As Long Dim intCnt As Long Dim maxgyo As Long 'シートAの最終行 Dim maxgyo2 As Long 'シートBの最終行 Sub データを分ける() maxgyo = Sheets(strMasSheet).Cells(Rows.Count, 1).End(xlUp).Row 'シートAの最終行を取得 For intRow = 2 To maxgyo '2行から始めて最終行まで(1upで) strSrhCode = Sheets(strMasSheet).Cells(intRow, 2) '検索値 B列= 得意先CDを取得 maxgyo2 = Sheets(strMasSheet2).Cells(Rows.Count, 1).End(xlUp).Row 'シートBの最終行を取得 For intRow2 = 2 To maxgyo '2行から始めて最終行まで(1upで) strSrhCode2 = Sheets(strMasSheet).Cells(intRow, 8) '検索値 H列 = 得意先CDを取得 intCnt = 2 '2行から If strSrhCode = strSrhCode2 Then 'もし検索値と検索対象シートの得意先CDが一致したら intCnt = intCnt + 1 With Sheets(strSrhSheet) .Cells(intCnt, 1) = Cells(intRow, 1) .Cells(intCnt, 2) = Cells(intRow, 2) .Cells(intCnt, 3) = Cells(intRow, 3) .Cells(intCnt, 4) = Cells(intRow, 4) .Cells(intCnt, 5) = Cells(intRow, 5) .Cells(intCnt, 6) = Cells(intRow, 6) .Cells(intCnt, 7) = Cells(intRow, 7) .Cells(intCnt, 8) = Cells(intRow, 8) .Cells(intCnt, 9) = Cells(intRow, 9) .Cells(intCnt, 10) = Cells(intRow, 10) .Cells(intCnt, 11) = Cells(intRow, 11) End With End If Next intRow2 Next intRow MsgBox "処理終了" End Sub 言葉足らずの所があればごめんなさい。 追記いたしますので、教えて下さい。 よろしくお願い致します。

    • 6338-tm
    • 回答数3
  • 【EXCEL2007】各シートのデータを統合した表を作成したい

    見ていただきありがとうございます。m(__)m 計算式を調べてみましたが、よい見本が見つからず 分かる方いらっしゃいましたら、お教えいただけないでしょうか。 【ソフト】 Microsoft office2007 EXCEL 【内容】 1月~12月の価格データを統合した表を作成したいのです。 画像を見ていただけると分かりやすいかと思いますが、 1月~12月までの価格表を作成し、それを統合シートにまとめたいのです。 品名の掲載順はバラバラなので、自動的に同じ品名が1月~12月に並ぶように。 また、2月以降から品名が増えたら、自動で統合シートの品目に並ぶように。 ・・・したいのです。 シート名は「1月」「2月」「3月」・・・「12月」となります。 自動で集計をする見本はあるのですが、ただ並べる計算式は見かけなくて・・・ どなたか分かる方、よろしくお願い申し上げます。m(__)m

    • rin1987
    • 回答数3
  • Wordでハイパーリンクを一括置換したい

    Wordの文章の中にある複数のハイパーリンクのアドレスに対して、固定の文字列を付け加えたいと考えています。 その時にハイパーリンクの表示文字列は変更しないこととします。 Wordの中のVBAで処理を行おうとしているのですが、WordのVBAの情報が少なくて困っています。 環境 WindowsVista Word2007 恐れ入りますが宜しくお願いします。

    • swans
    • 回答数1
  • 【EXCEL2003】範囲に含まれた項目を全部抜き出す関数

    質問してばかりで恐縮ですが、また行き詰ってしまいました。 皆さんのお知恵をお貸しください。 添付の画像をご覧いただくと分かりやすいと思いますが、範囲指定するのは『売価』です。 指定した範囲に含まれた売価の行項目を抜き出したいのです。 (表1)から100円以上200円未満の売価の商品を抜き出して(表2)を作りたいのです。 ここで質問した続きになります。 http://oshiete1.goo.ne.jp/qa5628538.html よろしくお願いいたします。

    • jiyoun
    • 回答数5