VBAでシリアル値を取得する方法を教えていただけないでしょうか
テキストデータで
20140810の形でデータがあります。
このデータをもとに、2014年8月10日のシリアル値である41861を取得したいのですが、その方法を調べてもわからないので、教えていただけないでしょうか
エクセルの関数のDATEVALUEのような関数をVBAの中でも使い41861を取得したいです。
シリアル値 取得 と検索すると、DateSerial関数がでてきますが違うようです。
わからなくなってきたので、アドバイスをお願いいたします。
No.1ベストアンサー
- 回答日時:
こんにちは。
Dim s As String
s = "20140810"
MsgBox CLng(DateValue(Format(CLng(s), "0/00/00")))
みたいに、
(Long型に)型変換 > Format(文字列型) > 日付型に変換 > (Long型に)型変換
するのがオーソドックスかと。
シート上の数式の方が少し簡単で、それを応用すると
MsgBox Evaluate("--TEXT(--" & s & ",""0-00-00"")")
とか。
以上です。
No.2
- 回答日時:
#1です。
2例目は
MsgBox Evaluate("--TEXT(" & s & ",""0-00-00"")")
2文字分短く書けたのでした。
失礼しました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
- ・ゆるやかでぃべーと タイムマシンを破壊すべきか。
- ・「I love you」 をかっこよく翻訳してみてください
- ・歩いた自慢大会
- ・許せない心理テスト
- ・字面がカッコいい英単語
- ・昔のあなたへのアドバイス
- ・かっこよく答えてください!!
- ・あなたが好きな本屋さんを教えてください
- ・これ何て呼びますか Part2
- ・人生で一番思い出に残ってる靴
- ・ゆるやかでぃべーと すべての高校生はアルバイトをするべきだ。
- ・初めて自分の家と他人の家が違う、と意識した時
- ・単二電池
- ・チョコミントアイス
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
wordの差し込み印刷で文字...
-
【C#】DataGridViewの最大列数...
-
excel access連携 このテーブル...
-
DTOとEntityの差は何ですか。
-
WordでExcelデータを差込...
-
JavaからPHPへの値の受け渡し
-
VBA内でのGetPixelを使用した時...
-
OleDbDataReaderで単精度浮動小...
-
PHP+SmartyとAjax
-
ASP.NET GridView の検索画面で...
-
「取得先」という表現について
-
Dosブロンプトでtabを出力したい
-
バッチファイルでpingの結果を...
-
Yahoo! JAPAN IDを新規取得でき...
-
Windowsのsetコマンドでの小数...
-
バッチファイルで、全てのウィ...
-
URLのパラメータをGETのままで...
-
shシェルスクリプト 空白行の...
-
開始と終了を指定して、その間...
-
VBAでPDFファイルの文書のプロ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
DTOとEntityの差は何ですか。
-
wordの差し込み印刷で文字...
-
【C#】DataGridViewの最大列数...
-
excel access連携 このテーブル...
-
WordでExcelデータを差込...
-
GridViewからチェックボックス...
-
INIファイルに一括書き込みを行...
-
表を表示するコントロールについて
-
VBA内でのGetPixelを使用した時...
-
ActiveReportのサブレポート機...
-
MSFlexGridのデータを初期化し...
-
C言語で地図を描きたい
-
VB6でDBからクリップボード経由...
-
JavaからPHPへの値の受け渡し
-
VB.NET 2017の勉強中です。 今...
-
ASP.NET GridView の検索画面で...
-
西暦4桁に変換する方法
-
Strutsで画面に表示した値の再...
-
Windowsのマクロプログラムで、...
-
PHP+SmartyとAjax
おすすめ情報