Luis_P

Luis_P

 100K puntos  Chile @luis_p desde - visto

Respuestas

Respuesta en a

Control Visual Basic Excel

Ese botón al que te refieres es simplemente "un botón", pero es una clase definida solo en excel ( como clase)., no es un control activex insertable. Respecto a lo segundo, si se puede crear algo idéntico en visual basic ( creando y comilando tu...
Respuesta en a

Macros programadas en access

A ver ... vas a operar con los datos en excel o Access, pues si es en access... este no es el foro.
Respuesta en a

Organizar datos de celdas

Aclarame algo en tu ejemplo pones Libros;12a1;14a2;16a3 Esto a1 a2 a3... es la referencia de la celda en la cual se ubican o es otra cosa, por que veo que difiere de esta: Libros;123a1;345a2
Respuesta en a

Cambiar color a un objeto

Podrías utilizar el evento change de la hoja para evaluar el valor de la celda en cuestión En este caso seria: Para el rombo de nombre "1 Rombo" considerando la celda F1 como la celda a evaluar Private Sub Worksheet_Change(ByVal Target As Range)...
Respuesta en a

Calendario que busque y seleccione fecha en Excel

¿Te refieres al control DTpicker o al Monthview? ¿En qué fila están las fechas a buscar?
Respuesta en a

Barra progreso

Para eso yo utilizo una solución bien sencilla Realizo un gráfico con el único valor (serie) de una celda. Le asigno los valores mínimo y máximo en las propiedades del gráfico desde cero hasta en este caso 75. Luego en las mismas pestañas de...
Respuesta en a

Crear excel con campos de otro documento

Cuek!. Sorry Es que debes modificar la ruta en estas lineas Range("b" & i) = "=+'C:\as\[" & m & "]Hoja4'!$A$20" Range("c" & i) = "=+'C:\as\[" & m & "]Hoja4'!$A$21" quedando asi: Range("b" & i) = "=+'C:\tu_carpeta\[" & m & "]Hoja4'!$A$20" Range("c" &...
Respuesta en a

.TXT a Excel

Ok. Entonces asi: Option Explicit Private Const MAX_PATH = 64 Private Const FILE_ATTRIBUTE_DIRECTORY = &H10 Private Type FILETIME dwLowDateTime As Long dwHighDateTime As Long End Type Private Type WIN32_FIND_DATA dwFileAttributes As Long...
Respuesta en a

Buscar valor en dos limites

Entonces: =si(c3>=a1 =y(c3<=b1);a1;si(c3>=a2 =y(c3<=b2);a2;si(c3>=a3 =y(c3<=b3);a3;a1)))
Respuesta en a

Lista para varios combobox

Prueba así: Dim cm As ComboBox For Each cm In Me.Controls If TypeOf cm Is ComboBox Then With cm .List = Array("Si", "No") End With cm.ListIndex = 0 End If On Error Resume Next Next

Suscríbete RSS