jrgces

jrgces

 293K puntos  Madrid, España @jrgces desde - visto

Respuestas en Microsoft Excel

Respuesta en a

Control Spinbutton no puedo asignar valor negativo

Usando VBA es posible conseguirlo (no sé si será posible sin tener que usar VBA): hay que establecer la propiedad SmallValue del control SpinButton a CERO y poner el siguiente código en el módulo de la hoja donde se encuentra (click derecho sobre su...
Respuesta en a

Contabilizar cantidad de una determinada letra

Si te sirve: =CONTAR.SI(K5:IL5;"*F*")
Respuesta en a

Hacer transparente ejecución macro

Sub MacroQueHaceMuchasCosas() Application.ScreenUpdating = False '... '... Cosas que hace la macro que hace muchas cosas '... Application.ScreenUpdating = True End Sub
Respuesta en a

Insertar hora actual después de colocar un dato

Si esto te sirve para empezar: http://www.jrgc.es/eventos01.htm#eventos01_3

Macro para crear una hoja nueva con fecha de hoy.

Worksheets. Add ActiveSheet.Name = Format(Now(), "dd-mm-yy")
Respuesta en a

Calendario que se active en una celda

si te sirve esto para empezar: http://www.jrgc.es/eventos01.htm#eventos01_7 Tendrías que modificar la instrucción If Target.Column = 1 Then Por If Target.Address(0, 0) = "A1" Then Sustituyendo A1 por la celda que necesites.
Respuesta en a

Función buscarv para texto

BUSCARV no te puede funcionar puesto que necesita que la columna en la que ha de efectuar la búsqueda sea la situada más a la izquierda, pero BUSCAR a mí me funciona perfectamente con los datos que pones: http://www.jrgc.es/ejemplos/ejemplo20090128a.xls
Respuesta en a

Ordenar Hojas Por Orden Alfabético

Tengo escrito un procedimiento en VBA que hace eso, mira si te sirve: http://www.jrgc.es/vba01.htm#vba01_9
Respuesta en a

Función si(Y( con fechas.

Entiendo que en la columna H quieres que aparezca el mes anterior al de la columna G. Si es esto, prueba con la fórmula =TEXTO(FECHA(AÑO(G1);MES(G1)-1;1);"mmm")
Respuesta en a

Acceso a Excel desde Visual Basic

Sub prueba() Dim appExcel As New Excel.Application Dim varArray(1 To 10) As Variant '<--- array de ejemplo con 10 elementos Dim lngNúmeroDeHojasActual As Long Dim wkbNuevoLibro As Workbook 'Almacenar el número de hojas en nuevos libros actual...