專票二維碼掃描是結果是:01,04,011001800211,65651348,1105.46,20180709,05903676700178588016,C62D, 麻煩請教下如何把里邊的值取出來放單元格內,謝謝。在execl 中,之前用=TRIM(MID(SUBSTITUTE($A2,",",REPT(" ",20)),COLUMN(A2)*20-19,20)) 也不靠譜。感覺有但難度。各位老師幫忙想下辦法
uj5u.com熱心網友回復:
可以的話,資料.分列 最簡單uj5u.com熱心網友回復:
就是想輸入一個顯示一個uj5u.com熱心網友回復:
實作起來很容易,不過不知道你具體想按什么規則拆。結合掃碼槍輸入的話,可以用VBA實作掃一條自動決議一條,這個代碼只要把Resolve替換成你的規則就可以了。
Private Sub Worksheet_Change(ByVal Target As Range)
Dim row As Integer, col As Integer
row = Target.row
col = Target.Column
If col = 1 Then Resolve Cells(row, col), row
End Sub
Private Sub Resolve(value As String, row As Integer)
Dim arr() As String
arr = Split(value, ",")
For i = 1 To 8
Cells(row, 1 + i) = "'" + arr(i - 1)
Next
End Sub
uj5u.com熱心網友回復:
你的公式里,替換的是中文的逗號,但你的資料里是英文的逗號,可能這是你公式沒有得到預期結果的原因uj5u.com熱心網友回復:
不完全是這個原因。我后來細看了那個公式,它應該是用大量的空格來淹沒各列資料,然后進行提取抹除首尾空格,那么用多少個空格來替換分隔符就是個問題,尤其是各列字符數不一樣甚至差別很大時,簡單模擬下就知道,若共 n列資料,資料最多位數為 a,那公式里的 20 至少得是 n*a,19也要調整為 n*a-1,當然了最多位列越靠前此值可減少但為簡單計就算了,此值可增大以求保險,但 20 和 19要協同調整。所以,樓主的資料,修改了半角全角問題,20/19 的設定是遠不夠的。uj5u.com熱心網友回復:
把內容拷到記事本里保存,把檔案擴展名由.txt改成.csv,然后艱雙擊打開檔案打開。轉載請註明出處,本文鏈接:https://www.uj5u.com/caozuo/35456.html
