Gizport
1 回答
0
Share (facebook)
70
view
全般

エクセル マクロ 文字の書式変換 いつも大変御世話になっております。...

エクセル マクロ 文字の書式変換 いつも大変御世話になっております。

【D: est】フォルダ内に、1つのエクセルファイル(Excel2003)があります。

sheet1のセルC3~5にセルの書式設定の表示形式が【文字列】で入力されております。

00:15:30 07:57:01 22:25:10

これをセルD3~5にセルの書式設定の表示形式が【時刻】の分類【13:30】の表示形式に
変換した結果を各セルに入力したいのです。
上記セルC3~5はセルD3~5に以下のように表示するのが理想です。

0:15 7:57 22:25

手動でセルC3~5を範囲指定して、セルD3~5に貼り付け後、とりあえずセルC3をセルの書式設定
にて表示形式を【時刻】の分類【13:30】に変更して、【OK】を押しても反映されませんでした。

しかし、セルC3を【F2】キーを押し、【Enter】キーを押すと、0:15と反映されました。
その他セルD4~5も同様の結果でした。
なぜ【F2】キーを押さなければ反映されないのでしょうか?

これを手動で実施するのは手間がかかるので、可能であればマクロで一括変換したいのです。
※ワークシート関数ではなく、可能であればマクロが理想です。

どなたかご存知の方はいらっしゃるでしょうか?

もしご存知の方がいらっしゃるようでしたら、ご教授願いますでしょうか?

あまりにも初歩的な質問で申し訳ありません。

何卒宜しくお願い致します。
Yahoo!知恵袋 5470日前
コメントする
お気に入り
1
質問者が選んだベストソリューション
マクロでの回答。
上記のような状況ならば、1行でできます。

Sub Sample()
With Range("C3:C5")
.Value = .Value
End With
End Sub

これでOKです。
また表示形式もついでに変更やエラー回避など考えるならば

Sub Sample2()
On Error Resume Next
Dim myRng As Range
For Each myRng In Range("C3:C5")
With myRng
If .Value <> "" Then
.Value = TimeValue(Trim(.Value))
.NumberFormat = "h:mm"
End If
End With
Next myRng
End Sub
Yahoo!知恵袋 5455日前
シェア
 
コメントする
 

参考になったと評価
  このQ&Aは参考になりましたか?

Share (facebook)
その他の解決方法を知っていますか?
回答する
全般
56
Views
質問者が納得Xi端末ご利用には、Xi契約、または新料金プランが必要です。 Xi端末にFOMA契約のSIMカードを入れても認識しませんのでご利用頂けません。 既にXiプランは、新規お申し込みを終了していますので、新料金プランとする必要があります。 契約変更手数料は、3,000円(税別)です。 料金表 https://www.nttdocomo.co.jp/charge/new_plan/bill_plan/index.html
3552日前view56
全般
67
Views
質問者が納得単純に「バージョンが違うものはだめ」でしょ。 バージョンが違えば当然コマンド(メニュー内容)が違うから。 同じバージョンで2台にインストールした場合を想定した移行なら 意味が分かりますけど。 面倒でも2つのバージョンを比較しながら手作業で設定してください。 ただし、「アクション」は、動作内容次第では移行できる場合があります。 (アクションに設定したショートカットキーを除いて)。
3712日前view67
全般
58
Views
質問者が納得はじめまして。 まずは、私が書いた知恵ノートがありますのでご覧ください。 http://note.chiebukuro.yahoo.co.jp/detail/n5671 しかし、貴方の場合は上記の知恵ノートでは解決できないと思います。 お使いのPCには2つの記憶装置があります。 一つは高速にアクセスできるSSD(容量64)と言う物です。 もう一つは通常のHDD(容量1500)です。 あえて容量の単位を書かず、数字で表現しましたが、ご覧のようにお使いのSSDの容量はHDDに比べ20分の1以下と非常に小さ...
3734日前view58
全般
52
Views
質問者が納得たしか、レビューを見たらドコモのケータイ自体が通知が来ないらしいです 私はAuなのできます
3763日前view52
全般
83
Views
質問者が納得毎回同じ状態になるのであれば、ショップに行ったほうがいいですね。その時だけなら様子見です。 そもそもその頃のARROWSなんて使い物にならない機種だけでしたから、機種変更も検討してみては?
3824日前view83

取扱説明書・マニュアル

1771view
http://www.nttdocomo.co.jp/.../F-07D_J_OP_All.pdf
159 ページ5.71 MB
もっと見る

関連製品のQ&A