EXCELのVBAで、「C:\My Documents」のようなロングファイル名を
「C:\Mydocu~1」のような昔のファイル形式にする方法を教えてください。

例えば
ThisWorkbook.Pathで得たパス名がロングファイルだった場合です。


目的は、ある古い別アプリをShellで起動させたいのですが、それの
引数に昔のファイル形式で色々なパスを渡さないといけないのです。
(そのアプリがロングファイル名に対応していない)

ヘルプとか見たんですけど分からないので教えてください。
お願いします。

このQ&Aに関連する最新のQ&A

A 回答 (3件)

GetShortPathNameというAPIを使用します。

VBAではAPIを使用する前に定義を
書く必要があります。定義は次の通りです。

Private Declare Function GetShortPathName Lib "kernel32" Alias "GetShortPathNameA" ( _
ByVal LongPath As String, _
ByVal ShortPath As String, _
ByVal ShortPathSize As Long) As Long

以下はサンプルです。

Dim FileName As String * 512
GetShortPathName "Z:\My Document\audio.wav", ShortName, 512
MsgBox Left(FileName, InStr(FileName, vbNullChar) - 1)

この回答への補足

宣言からしますと、

Dim FileName As String * 512
Dim ShortName As String
Dim lRet As Long
lRet = GetShortPathName "Z:\My Document\audio.wav", ShortName, 512

で使い方合ってますか?
lRet = 0
ShortName ="" で戻ってきちゃうんですよ。
MSのHPで検索してもC言語の「GetShortPathName」しかでないし
困ってしまってます。

補足日時:2001/12/20 00:37
    • good
    • 0
この回答へのお礼

回答有難うございます。

残念ながら、まだ解決はしてませんのでお手すきの時に
補足を見ていただければ幸いです。

お礼日時:2001/12/20 00:37

こんにちは。

maruru01です。
tnakさんの回答の間違いを。
多分単なるタイプミスだと思いますが、

GetShortPathName "Z:\My Document\audio.wav", ShortName, 512
を、以下のようにします。

GetShortPathName "Z:\My Document\audio.wav", FileName, 512

あと、第3引数の文字列長は、
Len(FileName)
とした方がいいかも知れません。(変数宣言での文字列長の指定値を変えた時にいちいち変えなくても済みますから。)
ちなみに、戻り値をつけるなら()がいると思います。
lRet = GetShortPathName ("Z:\My Document\audio.wav", ShortName, 512)

横から口を出してすみません。
では。
    • good
    • 0
この回答へのお礼

お礼が遅れてすみません。

頂いた回答を元にコードをブラッシュアップさせていただきます。
ありがとうございました。

お礼日時:2001/12/27 14:26

 えーと、このまま使っても実在するファイル名がなければ正しい答えを返し


てくれません。GetShortPathNameでは結果的にディスクに記録された8+3
形式のファイル名を吐き出してくれるだけですから実在しないと何も返しませ
ん。

"Z:\My Document\audio.wav"

を実在するファイル名に変えてください。
    • good
    • 0
この回答へのお礼

お礼が遅れてすみません。

最初の回答をヒントに、なんとか解決できました。
有難うございました。

お礼日時:2001/12/27 14:24

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qpathの設定の時。SET PATH とPATHのどっちを使えばいいか?

いろいろな言語で最初にPATHを設定しますよね。
Win98などで設定する時、AutoExecに記述します。
その時、本によって
「SET PATH=~」
「PATH=~」
の2種類が書いてあります。これは、どう違うんですか?

また、僕のパソコンでは、PATH=~ で、最初から他のパスが通されているんですが、
SET PATH=~を使っても、正常にPATHは機能しますか?

だれか、わかる人がいたら、教えてください。よろしくお願いします。

Aベストアンサー

http://www.longtail.co.jp/kit/c01.htmlには
環境変数は、MS-DOSなら、コマンド行で次のように入力すれば設定できます。
C:>SET PATH=C:\WINDOWS;C:\WINDOWS\COMMAND;D:\WINDOWS\SYSTEM;C:\BIN
PATH変数については、次のような設定方法もあります。
C:>PATH=C:\WINDOWS;C:\WINDOWS\COMMAND;D:\WINDOWS\SYSTEM;C:\BIN
と書いている方がいます。
とどちらでもOK、SET PATH=が標準のようです。

Q絶対パス名からファイル名を取り出して、変数に格納するバッチ

DOSコマンドバッチで定義した変数"fullpath"に絶対フルパス名が格納されているとします。
この変数からファイル名だけを抽出して別の変数"filenae"に格納したいのですが方法がわかりません。

1. set fullpath = "C:\test\test.c"
2. ----ここの部分をどのように処理すれば?------
3. set filename = fullpathから抽出したファイル名

私がやってみた方法として、for文とdir /bを組み合わせてみたのですが
for %a in ( dir /b c:\test\test.c ) do set filename =%a

本来dir /bを実行するとファイル名のみが表示されるのに、For文をかますと絶対フルパスでfilenameに値が格納されてしまいます。

dir /b c:\test\test.cの結果を直接filename変数に格納できれば解決するのですが、コマンド結果を変数に格納するにはFor文を使わないとだめなんですよね?
なにかよい方法はないでしょうか?

DOSコマンドバッチで定義した変数"fullpath"に絶対フルパス名が格納されているとします。
この変数からファイル名だけを抽出して別の変数"filenae"に格納したいのですが方法がわかりません。

1. set fullpath = "C:\test\test.c"
2. ----ここの部分をどのように処理すれば?------
3. set filename = fullpathから抽出したファイル名

私がやってみた方法として、for文とdir /bを組み合わせてみたのですが
for %a in ( dir /b c:\test\test.c ) do set filename =%a

本来dir /bを実行するとファイル名...続きを読む

Aベストアンサー

@echo OFF
setlocal
set fullpath="C:\test\test2.c"
Call :BASENAME %fullpath%
echo %fname%
Goto :EOF
:BASENAME
set fname=%~nx1

詳しくは、call /? または for /?

Qbatでファイル名を変更したい(元ファイル名の一部を削除したファイル名に)

batファイルを使ってファイル名を変更する方法を教えてください。
例えば、
変更元ファイル:tata1234.exe
変更先ファイル:tata.exe(元ファイル名の一部を削除した名前)

流れでは、あるファイルをbatにドラッグ&ドロップして
COPY %1 %TMP%\%~nx1
REN %TMP%\%~nx1 ???????
変更したファイルを元ファイルのあったフォルダに移動(orコピー)

別ファイルに出力したりしないと無理でしょうか?宜しくお願いいたします。

Aベストアンサー

元ファイル名の先頭4文字まで残して5文字目以降を消すということでいいでしょうか。

set NAME=%~n1
REN %TEMP%\~nx1 %NAME:~0,4%.%~x1

>変更したファイルを元ファイルのあったフォルダに移動(orコピー)
これはどういう意味?変更とは?

QUNIXの<ファイル名>\rの意味

grep '検索文字' ファイル名1.dat>>ファイル名_k.dat
grep '検索文字' ファイル名2.dat>>ファイル名_k.dat
.
.
.
と、書いてあるファイルをchmodで実行ファイルにして実行したら、
"ファイル名_k.dat\r"というのが出きていて、このファイルを見る
こともできないし、消すこともできません。
この\rは何を意味しているものなのでしょうか?
知っているひとがいたらよろしくお願いします。

また、文字検索を行って一つのファイルにまとめる他の方法も、
教えてください。
お願いします。

Aベストアンサー

シェルスクリプト(あるいはバッチファイル?)を書いたエディタの
改行コードが合ってなかったのでしょう。

改行コードはOSによって以下のように違います。
Unix---:LF (\n)
Windows:CR+LF (\r\n)
Mac----:CR (\r)
(CRは復帰、LFは改行という1文字をあらわしています)

Windowsのエディタでそのまま
>grep '検索文字' ファイル名1.dat>>ファイル名_k.dat
と書くと、実際のファイルには、
>grep '検索文字' ファイル名1.dat>>ファイル名_k.dat+CR+LF
と書きこまれます。
これをUnixで評価すると、LFのみが改行なので、
>grep '検索文字' ファイル名1.dat>>ファイル名_k.dat+CR
という行が書かれていることになります。
「ファイル名_k.dat\r」というファイル名です。

多分、見ることや消すこともできますよ。
ワイルドカード1文字分使って、
「ファイル名_k.dat?」と指定してやれば。
catで閲覧することも、rmで消すこともできるはずです。

でもその前にエディタの改行コードをUnix用に変更してくださいね。
まともなエディタなら変更できるはずです。

あと別の方法って、
grep '検索文字' file1 file2 file3... > report.txt
と、ファイルをたくさん書いておけばいいのでは?
質問の例だと、
grep '検索文字' ファイル名?.dat > report.txt
の1行で十分だと思いますよ。

シェルスクリプト(あるいはバッチファイル?)を書いたエディタの
改行コードが合ってなかったのでしょう。

改行コードはOSによって以下のように違います。
Unix---:LF (\n)
Windows:CR+LF (\r\n)
Mac----:CR (\r)
(CRは復帰、LFは改行という1文字をあらわしています)

Windowsのエディタでそのまま
>grep '検索文字' ファイル名1.dat>>ファイル名_k.dat
と書くと、実際のファイルには、
>grep '検索文字' ファイル名1.dat>>ファイル名_k.dat+CR+LF
と書きこまれます。
これをUnixで評価...続きを読む

Qshellスクリプトから別のshellスクリプトを呼び出す方法

今現在VineLinux4.1をサーバとして起動させております。
その関係もありまして維持としてシェルを動かす事はある意味必須の状態です。
本題はAと言うスクリプトからBと言うスクリプトを呼び出す方法がわかりません。
試してみた方法はsourceで呼び出す方法です。
A.shの中身を以下とすると

#!bin/bash
echo ="B.shを呼び出します"
source B.sh
echo ="シェルスクリプトを終了します"
exit 0

上記のようにした場合、最初のecho文は出力され、B.shの内容を一通り終えると最後のechoは出力されずA.shは完了しません。
ごくごく基本的なことかもしれませんが、うまく検索にも引っ掛けられなかったので、ご質問させていただきます。
よろしくお願い致します。

Aベストアンサー

#2です。

>cshは=の前後にスペースが入るかと思いますが、今回はbashを指定しておりますので。

cshの何のことを言ってるのかわかりませんが、例えばbashで、
echo="シェルスクリプトを終了します"
は、echoコマンドじゃなくて、echo というシェル変数に「シェルスクリプトを終了します」という文字列をセットするコマンドになります。当然何も表示されません。

>A.shとB.shは単独で正常に稼動できる状態です。

B.shが単独で正常に動いているように思えることは、B.shに問題がないことを意味しません。
例えば、B.sh をexitで終了したりするとそこでbashは終了するわけだし。

>質問の例はあくまで例ですが、

書かれているA.shに問題がなさそうなので、B.shの中に原因があると想像しました。
現象が発生する最小限の、A.sh と B.sh の内容をすべて正確に書いてください。

今気づきましたが、A.sh の最後に無意味なexit 0がありますが、もしかして、B.shの最後にもexit 0が?

source コマンドは、その場所に指定したファイルの内容を挿入するコマンドです( C の #include 相当 )。もし、新たにbashプロセスを起動して、そこでB.shを動かしたいなら、
bash B.sh
です。他には#1の方が書いた方法もあります。

#2です。

>cshは=の前後にスペースが入るかと思いますが、今回はbashを指定しておりますので。

cshの何のことを言ってるのかわかりませんが、例えばbashで、
echo="シェルスクリプトを終了します"
は、echoコマンドじゃなくて、echo というシェル変数に「シェルスクリプトを終了します」という文字列をセットするコマンドになります。当然何も表示されません。

>A.shとB.shは単独で正常に稼動できる状態です。

B.shが単独で正常に動いているように思えることは、B.shに問題がないことを意味しませ...続きを読む


人気Q&Aランキング

おすすめ情報