Visual Basic Converter número decimal em hora - VBA

[julianasilva2603]

Olá! Tenho algumas células no Excel formatadas como hora  e eu gostaria capturar esses valores no VBA no mesmo formato de hora, porém só o que consigo obter são números decimais (Ex.:  08:00 - 0,333333333333333). Há alguma forma de converter esse número para hora no VBA ?

[Midori]

@julianasilva2603 Para isso tem a função FormatDateTime ou Format onde você pode personalizar o formato. É só passar o valor da célula para a função.

[Gudelícia]

Olá pessoa. Estou com o mesmo problema. A função Format não funcionou para trazer o valor valor frazionário da hora, conforme o exemplo dado acima (Ex.:- 0,333333333333333) para a hora inteira   (08:00) e colocar essa hora numa variável de memória temporária. Tentei tudo que meu pouco conhecimento sabe de vba e não conegui. Uma ajudinha por favor.

[Midori]

@Gudelícia Como usou a função Format? Tentou a outra função FormatDateTime? p.ex,

MsgBox FormatDateTime([A1].Value)

 

Assim caso a célula A1 tenha um valor fracionário a função vai converter para o formato de hora.

[Gudelícia]

@Midori Não sei o que eu estava fazendo de errado, mas consegui. Usei a seguinte construção:

 

hvlr variável de memória temporária

O é a range onde está a hora em decimal

ficou assim:

 

hvlr = format(o, "HH:MM") = 20:00

Resolveu o meu problema. Muito obrigado.