Poli Plos

¿Conoce el grabador de macros? - Vaya al menú "Archivo" --> "Opciones" - En "Personalizar cinta de opciones" active la casilla "Desarrollador" Verá que le aparece un nuevo menú "Desarrollador" que tiene un botón llamado "Grabar macro". Pulse el...

1.- Guarde el archivo como tipo "Libro de Excel habilitado para macros": 2.- Active la pestaña de opciones "Desarrollador". Se hace por medio del menú "Archivo" --> "Opciones": 3.- Vaya al editor de código. Se hace por medio de la pestaña...

No aparece el mensaje porque no se produce un error en tiempo de ejecución. Cuando se usa "On Error Goto XXXX", la ejecución salta a la etiqueta XXXX si se produce un error. Por ejemplo, una división por cero, tratar de abrir un archivo que no...

"Añadiría aquí que las concurrencias no son importantes, quizás 5 o 6 puestos" Pues lo tiene usted mal, porque Excel no le permite concurrencia. Si una persona abre el archivo, los demás no lo podrán abrir para edición. Sólo podrán abrirlo en modo...

Pruebe con esta fórmula: =IZQUIERDA(REPETIR(CONCATENAR(A2;", ");C2); LARGO(REPETIR(CONCATENAR(A2;", ");C2))-2) (Suponiendo que el nombre está en la celda A2 y el número de repeticiones en la celda C2)

Puede probar con esta función: Public Function MiFuncion(ByVal strCadena As String) As String For Each strpalabra In Split(strCadena, " ") MiFuncion = MiFuncion & UCase(Left(strpalabra, 1)) Next End Function

Puede probar algo así: Dim sPath As String sPath = CreateObject("WScript.Shell").specialfolders("Desktop") & "\Fayser Adm.xlsm" ActiveWorkbook.SaveAs Filename:= _ sPath, FileFormat:= _ xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False

¿Se refiere usted a algo así? =CONTAR.SI(Hoja2!D2:D1000;"="&"")-CONTAR.SI(Hoja2!A2:A1000;"="&"")

Añade una función para detectar el error: =SI.ERROR(FECHANUMERO(H2)+7;"")

Para añadir un adjunto cuya ruta tiene en la columna 4, puede usar lo siguiente: . Attachments. Add(Cells(i, 4). Value)