#fullname

[eric-sadahire]

Yoda's full name is "Yoda Layheehoo"

[hospitalroommate]

CORINNE

i have a fascination with my name

scribbled out on papers and typed on documents

dropping from people’s tongues, slipping from their lips

because it’s everything i am

there are other people with my name, characters created with my name, living my name

and i sit and i wonder on nights like these

staring at my name typed out in front of me

what are they like?

[leatherwooddesign]

Brushed Teal Metal Look with Name MacBook Pro Sleeve by kahmier

[kotaexcel]

ファイルのFullNameをファイルのパスとファイル名に分割する

今回は、ファイルのFullName……つまり、ファイルのパスとファイル名がくっついているものを、それぞれに分割するマクロを作ります。

まずはコードから。

Sub sample24()    Dim temp As Variant, i As Long, folder_path As String, file_name As String    temp = Split(ThisWorkbook.FullName, "\")

   file_name = temp(UBound(temp))

   folder_path = temp(0)

   For i = 1 To UBound(temp) - 1        folder_path = folder_path & "\" & temp(i)    Next End Sub

な￥仕組みは単純なもので、まずはSplitでFullNameを「\」で分割します。

Splitは分割して配列として渡してくれるので、それをtempに入れます。

tempの最後の要素がファイル名。それまでの要素を「\」でつなぎなおしたものがパスなので、あとはそれぞれうまい具合に取得するだけです。

まぁ今回のマクロだと、そもそもThisWorkbook.Nameとかでファイル名が取得できるのでうまみはありませんが、例えばファイルのFullNameを受け取って処理をするときなどに役に立ちます。

ということで、記念すべき１００回目の投稿では、これを使って、マクロを作っていきたいと思います。

[mjoriginals]

Postpone Mastudentloan | Real Name Google Searches

See more 'Real Name Google Searches' images on Know Your Meme!

fave

[blackmildew]

If anyone was wondering what my real full name is, it's your lucky day :P someone's getting married soon and I'm an invited guest. #name #fullname #wedding #washingtondc #sequoia (at Washington, District of Columbia)

[yesyfur]

Parents can be scary haha 😅 - - - - #parents #fullname #youreintrouble #thatcanonlymeanonething #omg #ididntdoit #nowimgoingtogetit #lol #lmao #kitty #meme #life

[rebasofia]

Captain James Tiberius Kirk. As noble as can be. . . #majestic #cat #goodmorning #fullname #lovehim