Board logo

標題: 請各位先進及大大幫忙我快失去動力了 [打印本頁]
作者: farmer900    時間: 2012-2-8 14:54     標題: 請各位先進及大大幫忙我快失去動力了

range("J3") = 3803761593029280

range("L3") = mid(right(range("J3") ,12),9,2)


結果變成 EXCEL 裡  L3 的結果變成E+

而不是我想要的 92

請各位大大幫我看看為什麼不是92

謝謝各位，祝各位順心如意
作者: register313    時間: 2012-2-8 15:01

回復 1# farmer900

L3=MID(RIGHT(J3,12),9,2)
[attach]9496[/attach]
作者: farmer900    時間: 2012-2-8 15:12

謝謝大大，是我沒講清楚

這個我有用出來

但在巨集裏面卻是不行

因為它必須跑回圈

所以必須用巨集


我有先用單一測試，若測試成功就要讓他跑回圈

但現在連在巨集單一測試都失敗

總之很謝謝您的解答
作者: register313    時間: 2012-2-8 15:26

回復 3# farmer900

J3設定為文字格式
再跑1次程式
作者: farmer900    時間: 2012-2-8 15:51

回復 4# register313


   
3803761593029280 放入 VBA

VBA裡面竟變成

range("J3") = 3.80376159302928E+15
難怪變成E+

但我還是想不出怎麼取出92
作者: register313    時間: 2012-2-8 15:58

回復 5# farmer900
  1. Sub AA()
  2. Range("L3") = Mid(Right(Range("J3"), 12), 9, 2)
  3. End Sub
複製代碼
作者: farmer900    時間: 2012-2-8 16:15

回復 6# register313


    [attach]9498[/attach]

結果如圖
作者: register313    時間: 2012-2-8 16:20

回復 7# farmer900

J3設定為文字格式
  1. Sub AA()
  2. Range("L3") = Mid(Right(Range("J3"), 12), 9, 2)
  3. End Sub
複製代碼
作者: farmer900    時間: 2012-2-8 16:24

回復 8# register313


   還是一樣的結果

但 J3 變成3.80376E+15 .....

在這先謝謝大大的辛苦

對不起...一直麻煩您了
作者: Hsieh    時間: 2012-2-8 18:02

回復 9# farmer900


    [L3] = Mid(Right(Format([J3], "0"), 12), 9, 2)
作者: farmer900    時間: 2012-2-8 19:02

回復 10# Hsieh


   感激!!!!!!!!!!

  謝謝您 ，這問題我困擾一個禮拜了，眼睛都佈滿紅絲

真的是太感謝您了，我的動力又出現了

我有去查大大的函數Format用法 ，看來我又會幸奮到寫程式寫到半夜了

謝謝您，也謝謝一直幫忙的前輩，祝各位順心如意，謝謝



歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)