yarazu の回答履歴

ACCESS2003からEXCEL2003をVBAで起動するコードを書いてます。 SetApplName = "c:\Program Files\Microsoft Office\office11\excel.exe /r c:\docume~1\alluse~1\docume~1\毎日の数字.xls" Call Shell(SetApplName, 1) のように指定していますが、いちいち短い名前を指定しないと いけないようで、面倒で困っています。 長いパス名を短いパス名に変換するような関数等はありませんか？ 他にもっと簡便な方法があればあわせてご教示ください。

ACCESS2003からEXCEL2003をVBAで起動するコードを書いてます。 SetApplName = "c:\Program Files\Microsoft Office\office11\excel.exe /r c:\docume~1\alluse~1\docume~1\毎日の数字.xls" Call Shell(SetApplName, 1) のように指定していますが、いちいち短い名前を指定しないと いけないようで、面倒で困っています。 長いパス名を短いパス名に変換するような関数等はありませんか？ 他にもっと簡便な方法があればあわせてご教示ください。

以下の連立一次方程式をＳＯＲ法で解く問題です。 初心者なりにガウスザイデル法を応用してプログラムしたつもりですが、やはり難しいです（答えは違います）。 どこをどうすれば良いのか分かりませんので、よろしければヒントや助言をいただきたいです。 PROGRAM SOR REAL A(10,10),B(10),X(10),X0(10) INTEGER N,I,J,K,Kmax,w N=3 A(1,1)=4 ;A(1,2)=1 ;A(1,3)=2 A(2,1)=1 ;A(2,2)=3 ;A(2,3)=1 A(3,1)=1 ;A(3,2)=2 ;A(3,3)=5 B(1)=16 B(2)=10 B(3)=12 X0(1)=1 ;X0(2)=1 ;X0(3)=2 w=1.2 Kmax=50 EPS=1.D-5 DO I=1,N D=A(I,I) S=B(I) B(I)=B(I)/D END DO DO K=1,Kmax DO I=1,N DO J=1,N if(J<I) X0(J)=X(J) S=S-A(I,J)*X0(J) END DO X(I)=(1-w)*X(I)+w*S END DO DO I=1,N S=S-(X(I)-X0(I))**2 END DO IF(S<EPS) GOTO 10 DO I=1,N X0(I)=X(I) END DO END DO 10 WRITE(*,*) K DO I=1,N WRITE(*,*) 'SOR法で求めた解は' WRITE(*,*) 'X(',I,')=',X(I) END DO END PROGRAM SOR !------------------------------------ ※wは緩和係数です

いつもお世話になっております。 Accessから抽出したデータをVBAを使って、Excelファイル として保存しています。 ExWorkSheet.SaveAs "ファイルパス" として保存しているのですが、上書き確認のダイアログ が表示されたときに、「いいえ」を押すと 「SaveAsメソッドは失敗しました」とエラーがでて しまいます。 エラー処理の書き方を調べているのですが、 よくわかりません。 ご存知のかた、どうかよろしくお願いいたします。

エクセルファイルに書いた抵抗のデータ(抵抗値、消費電力など)をVBを使って読み込み、それを使ってどの組み合わせがいいのかなどを検証するプログラムを作りたいのですが、エクセルファイルからのデータの読み込み方がよく分かりません。どなたか、サンプルプログラムを提供していただけないでしょうか？

Excelで秒を時間に直す方法を教えてください。 セルA1に3600と入力したものを、'1:00:00’と言う風に置き換えたいのです。 別のセルでも、同じセルの表示形式でもどちらでも良いので教えてください。

大きくて、強力な磁石を探しています。 販売店名や製品名など詳しい情報をご存知の方、宜敷くお願いします。 なるべく大きさなどの詳細情報もわかる範囲で宜敷くお願いします。

各市町村の財政が豊かであるかどうかは、 それぞれのHPを見ればわかるのですが、 それを全国市町村のランキング形式で あらわした資料（HP)はありますでしょうか。 たとえば、トヨタの工場がある町では トヨタから税金がたくさん入ってくるので 財政が豊かになり、 そのため公共施設や福祉が充実しているようです。 よろしくお願いします。

舞台は大リーグっぽい気がします、読んだのは６月に入ってからだと思います。 確かドミンゴという投手がカミソリボールみたいな名前のすごく曲がる球を投げていました。 それに対してモグラ打法という打法で打とうとしたが打ったもののボールはどっかの塁あたりで落ちて結局アウト。絵がかなり特徴的でとても印象に残っています、掲載雑誌もわかりましたらそちらもお願いします。

ＶＢであるところにあるＣＳＶファイルのデータを読み込みエクセルへ変換出力したいのですが教えてください。コモンダイアログボックス（？）と言うものを使って作成したいのです。よろしくお願いします。 がんばってやってみたのですがわかりません。教えてください。 Private Sub Command1_Click() Dim gnum(25), tensuu(32, 99) Dim sougouten(99), heikin(99), gouhi$(99) 'ファイルを開く On Error GoTo ErrHandler 'コモンダイアログボックス CommonDialog1.CancelError = True CommonDialog1.Filter = "すべてのファイル　(*.*)|*.*|" _ & "テキスト　ファイル　(*.txt)|*.txt|バッチ　ファイル　(*.bat)|*.bat" CommonDialog1.FilterIndex = 2 CommonDialog1.ShowOpen With CommonDialog1 .FileName = "" .ShowOpen End With Exit Sub ErrHandler: '　ユーザーが　[キャンセル]　ボタンをクリックしました。 End Sub

大阪の京橋で、ディズニーのイベントがあると耳にしたのですが、インターネットで検索しても見つからなくて、もしかして日にちや場所の情報が間違えていたのかなとも思うのですが・・・。テレビのＣＭ（番組の中で紹介されたのかもしれないです）もしていたようなのですが。 ご存知の方いらっしゃったら、情報教えてください！

大阪の京橋で、ディズニーのイベントがあると耳にしたのですが、インターネットで検索しても見つからなくて、もしかして日にちや場所の情報が間違えていたのかなとも思うのですが・・・。テレビのＣＭ（番組の中で紹介されたのかもしれないです）もしていたようなのですが。 ご存知の方いらっしゃったら、情報教えてください！

エクセルにHPからいろんなデータをコピーしてたら、なぜか、セルの区切り線（罫線を書く前の薄い灰色の線）が消えた部分ができてしまいました。セルの区切り線を復活するには、どうすればいいですか？

64版の動物の森を持っているのに GC版の動物の森＋を買うのはもったいないでしょうか？ それとプレイした感想をお聞かせください。

分数の入った数式を入力したいのですがうまくできません。 方法を教えていただけませんか？ ワード２００２を使用しています。 よろしくお願いします。

小企業ですが、社員各自のメール情報をサーバーのあるＰＣに集約したいのです。社員は直行直帰が多く、取引先からのメールの見忘れによる苦情も多いため、各自のメールを部長が閲覧取りまとめをしたい意向です。レンタルサーバー（ファーストサーバ社）での設定が出来るのか、またはOutlookExpressのメールから設定可能なのか。　設定方法も含めてアドバイスをよろしくお願いします。