operaciones leer funciones ejemplos con caracteres cadenas cadena arreglo string vba ms-access access-vba

string - leer - Dividir datos de cadena en acceso a mĂșltiples columnas



string c# ejemplos (1)

Tengo una columna con varios códigos de servicio que estoy buscando dividir en diferentes columnas para fines de recuento en Access. Un ejemplo de una línea se ve así:

$= ** ;= AA AC BB1 CA5 CC4 CC5 CC6 CC7 CC9 CD1 CI CR D0 D1 D2 D3 D9 F> F> FA7 FA9 FB1 HA6 KJ P* P? PW PZ QG V4 WJ 1D 2O

El objetivo es crear una columna de AA, una columna de CA, etc. para contar qué código de servicio se utiliza para cada fila. Además, cada línea de códigos de servicio es excepcionalmente diferente de los demás. ¿Alguna idea? También estoy familiarizado con macros y consultas SQL.

Esto es lo que tengo hasta ahora:

Sub splitColumn() Dim rst As DAO.Recordset Dim arr() As String Dim i As Integer Set rst = CurrentDb.OpenRecordset("SELECT * FROM _Raw") arr = split(rst("Serv Cde String"), ",") For i = 0 To UBound(arr) ''/do something here Next i End Sub

Gracias,

Rebecca


El separador parece incorrecto:

Sub splitColumn() Dim rst As DAO.Recordset Dim arr As Variant Dim i As Integer Set rst = CurrentDb.OpenRecordset("SELECT * FROM _Raw") arr = Split(rst("Serv Cde String").Value, " ") For i = LBound(arr) To UBound(arr) ''/do something here Debug.Print i, arr(i) Next Set rst = Nothing End Sub