denbeeのプロフィール

@denbee denbee
ありがとう数588
質問数1
回答数946
ベストアンサー数
192
ベストアンサー率
28%
お礼率
0%

  • 登録日2005/02/21
  • マクロでシート名を変更を変更したい

    A1セルの値をシート名にするマクロは以下のとおりだと思います。 Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) If Target.Address = "$A$1" Then Sh.Name = Target.Range("A1").Value End Sub では、E6セルの値をシート名にすることは可能でしょうか? よろしくお願いします。

  • エクセルVBAでPDFを開く

    以下のような記述でアクロバットリーダーは立ち上がるのですが、 「この文書を開くときにエラーが発生しました。このファイルが見つかりません」 と出てきてしまいます。 どのようにしたら開いてくれるのでしょうか? Sub test3() Dim P As String P = "\\C:\AAA\sample.PDF" Shell "C:\Program Files\Adobe\Reader 11.0\Reader\AcroRd32.exe" & " " & P, vbNormalFocus End Sub

  • この話はかなり精度の高い推論だと思いますか?

    国際教養大学は、倍率や偏差値を上げるために国立大と併願できるような変則的かる軽量の入試を行っています。 これを国立大と同一日程にすれば 倍率は、1.0程度、偏差値50程度まで下がるという人がいます。 この推論はかなり精度が高い推論だと思いますか? あなたの考えをコメントしてください。

  • 女どもの多い企業でのスキル

    大学2年です! あと数年で就職しますが 女どもの多い企業(下着メーカー・化粧品など)に行きたいです そしてセフレを4人ほど作りたいです(笑 化粧品や下着メーカー(営業・販売でない)はどのようなスキルが求められますか?

  • [VBS] 動的配列について教えてください!

    VBS初心者です。 以下のように、リストを読み込んで動的配列に持たせたいです。 ----------------------------------------------------------------- GET_FILE = "sample.txt" SET objFs = CreateObject("Scripting.FileSystemObject") ' 動的配列セット Call Array_Set("AryVal",GET_FILE) ' 表示 For i = 0 To Ubound(AryVal) msgbox AryVal(i) Next ' 終了 WScript.Quit 0 Function Array_Set(AryName,ReadFile) Set strVal = objFs.OpenTextFile(ReadFile) ' 1行づつ処理 Do While strVal.AtEndOfStream <> True i = i + 1 ReDim Preserve AryName( i - 1 ) AryName( i - 1 ) = strVal.ReadLine Loop End Function ----------------------------------------------------------------- 見て頂くと分かるとおり、動的配列として持たせたい変数名を Functionの引数として渡しています。(当然のごとくエラー、、、) Functionの引数として渡した値に動的配列が格納される方法があれば教えてください。 よろしくお願いします。