antares18

Prueba a ver a poner en vez de esblanco(A32) a A32=""

La función para algo misma fila pero otra columna es buscarv y la de buscar algo misma columna y otra fila es buscar Ej: Si el A5 es el id y el A6 es el nombre de la persona y has de hacer una factura de algo entonces pones =Buscarv(Primer valor de...

Esto para la 1 letra Function LETRA_IZQ(Palabra, letra) As String dim num_color as integer For Each Item In Palabra if(left(item,1)=letra) then num_color=num_color+1 Next Item End Function Esto para el color, si solo vas a usar 3 colores te digo hay...

Este caso si puedes utilizar cada valor de la tabla por separado, si no puedes crear un array que te copie los números. El ítem es cada valor del rango. Si quieres hacerlo con 2 dimensiones, el ítem te coge de izquierda a derecha y de arriba a abajo....

He escrito las 2 primeras columnas. Donde está el 17 colocas: =16+(casilla donde está el 1) Arrastras todas las filas, porque sólo te deja la fila o la columna. Y después las columnas, hasta las 100. Y después borras las que sobran Si has de hacerlo...

TextBox1.Text = Replace(TextBox1.Text, vbCr, " ") Si no te funciona prueba con vbLf o VBCrLf

Private Sub CommandButton1_Click() Call Application.Quit End Sub Diría que es igual

B1=A1 B2=A2 ... B5=A5 Parece cutre pero lo más simple es siempre lo mejor