Post Reply 
importing excel file to hp prime
12-28-2018, 11:31 PM (This post was last modified: 12-31-2018 07:48 PM by YEDERF.)
Post: #5
RE: importing excel file to hp prime
Here is the way to transfer text and formulas, do not contemplate G1...G9 ni M1...M9 L1.....L9 Z1....Z9






code vb excel 2016

Sub EncontrarÚltimaFila()
Dim f As Long
'Lee la fila de la ultima celda de UsedRange
g = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
f = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Column
' MsgBox f
'MsgBox g

For i = 1 To g
For j = 1 To f
'Debug.Write(index.ToString & " ")
texton = ""
If TypeName(ActiveSheet.Cells(i, j).Value) = "String" Then
texto = ActiveSheet.Cells(i, j).Value
T = Len(texto)
For k = 1 To T
C = Mid(texto, k, 1)
C = Application.WorksheetFunction.Unicode(C)

texton = texton & C & ","
Next
texton = Left(texton, Len(texton) - 1)
texton = "CHAR({" & texton & "})"
ActiveSheet.Cells(i, j).Value = texton
'MsgBox ActiveSheet.Cells(i, j).Value
End If


Next
Next
End Sub
Find all posts by this user
Quote this message in a reply
Post Reply 


Messages In This Thread
RE: importing excel file to hp prime - YEDERF - 12-28-2018 11:31 PM
RE: importing excel file to hp prime - DrD - 01-02-2019, 03:30 PM



User(s) browsing this thread: 2 Guest(s)