フォルダの移動

いつもお世話になっております。
テキストボックスに名前をいれると
その対象の名前のフォルダの移動を
したいのですが、3時間経過どうやっても
うまくいきませんです。
添付ファイルのようにフォルダがならんでいます。

テキストﾎﾞｯｸｽｽに入力をしてＨＩＴしたら
契約済みフォルダに移動いたしいのです。

"C:\Users\****\OneDrive\デスクトップ\書類ファイル\" & TextBox1.Value
\****\ここの部分は個人名が入っているので****にしてあります。



Private Sub CommandButton1_Click()
Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")

Dim sourceFolder As String
Dim destinationFolder As String

sourceFolder = "C:\Users\****\OneDrive\デスクトップ\書類ファイル\" & TextBox1.Value
destinationFolder = "C:\Users\****\OneDrive\デスクトップ\書類ファイル\契約済みフォルダ\"

fso.MoveFolder sourceFolder, destinationFolder

Set fso = Nothing
End Sub

質問者からの補足コメント

• 

  ありがとうございます
  外付けドライブかいます。
  高いかな

  No.1の回答に寄せられた補足コメントです。 補足日時：2021/09/18 20:12

• 

  めぐみんさま
  バスが見つかりませんとでるんです。
  【契約書類データ】二宮　拓夫_様で
  テキストﾎﾞｯｸｽｽに　二宮　拓夫　と入力すると
  当然なのですが、
  名前だけ入力して部分一致で検索して
  移動することはできますでしょうか

    補足日時：2021/09/18 20:18

• & "*" & TextBox1.Value & "*"
  でもだめてすね
  さっきからやってますからわかります。
  like　でもだめでした。
  これやっぱりむりですね
  pathがそもそもちがうのですからね

    補足日時：2021/09/18 20:23

• 

  & "【未契約書類データ】" & TextBox1.Value & "_様"
  だとうまくいきました
  【未契約書類データ】と【契約書類データ】があるので
  下記のコードをためしましたが、だめでした。
  
  書類ファイル\" & "【 " & " * " & "契約書類データ】" & TextBox1.Value & "_様"

    補足日時：2021/09/18 20:49

No.5 ベストアンサー 回答者： めぐみん_ 回答日時： 2021/09/18 21:06

https://atmarkit.itmedia.co.jp/ait/articles/1705 …

｛source｝は必須だ。移動させるフォルダのパスを指定する。source引数として指定する文字列では、パスの最後の構成要素に限ってワイルドカード文字を使用できる。

パスの最後をあいまいにすることは可能のようですが途中をあいまいには出来ないようです。

この回答へのお礼

いつもありがとうございます
書類ファイル\" & "【未契約書類データ】" & TextBox1.Value & "*"
でうまくいきました。
これが限界ですね
ありがとうございました。うれしいです。

お礼日時：2021/09/18 21:11

No.4 回答者： めぐみん_ 回答日時： 2021/09/18 20:35

これが関係するのかな？

https://teratail.com/questions/283296

この回答へのお礼

参考にいたします。

お礼日時：2021/09/18 22:20

No.3 回答者： めぐみん_ 回答日時： 2021/09/18 20:33

https://work.lifemake.design/entry/2017/09/25/19 …

とか

この回答へのお礼

参考にいたします。

お礼日時：2021/09/18 22:20

No.2 回答者： めぐみん_ 回答日時： 2021/09/18 20:25

＞【契約書類データ】二宮　拓夫_様で

＞テキストﾎﾞｯｸｽｽに　二宮　拓夫　と入力すると

TextBoxの値の後ろに & "_様" ではダメですか？

外付けも容量が大きい物は高いでしょうけど、ちょっとやるならＵＳＢメモリでも良いんじゃないかな？
ONE DRIVEにバックアップしてるような感じですし。
バックアップ元に設定出来そうな？（インストしてるけど使ってない物で）

この回答へのお礼

ありがとうございました。

お礼日時：2021/09/18 22:19

No.1 回答者： めぐみん_ 回答日時： 2021/09/18 20:09

昔と違って最近のＯＳですとＣドライブのセキュリティは上がってますので、パーティションを分けてる若しくは外付けドライブやＵＳＢメモリがあるならＣドライブ以外で試すようにした方が良いかも。

それでも同じってならベテラン様にお任せですけど。

この回答へのお礼

ありがとうございました。

お礼日時：2021/09/18 22:19