12,666
回編集
差分
ナビゲーションに移動
検索に移動
編集の要約なし
==[[Excel VBA GUIDを生成する]]==
========
Public Sub GetGUID()
strGuid = CreateGuidString()
strGuid = Replace[[R]]eplace(Replace[[R]]eplace(strGuid, "{", ""), "}", "")
ActiveCell.Value = strGuid
End Sub
© 2006 矢木浩人
