Preguntas esperando respuesta
Actividad pública reciente
Voto positivo a la respuesta
Copiar hoja de un libro a otro
Te anexo la macro con los cambios Private Sub CommandButton2_Click() 'Act.Por.Dante Amor Set h1 = Sheets("datosm1") h1.Select h1.PrintOut Copies:=1, Collate:=True nombre = h1.[B2] h1.Copy Application.DisplayAlerts = False ActiveWorkbook.SaveAs...
Voto positivo a la respuesta
Macro para deshabilitar la tecla de imprimir pantalla
Pon lo siguiente en un módulo Option Explicit Private Declare Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, ByVal dwThreadId As Long) As Long Private Declare Function...
Voto positivo a la respuesta
Suma de varias columnas a ser agregadas con código
¿Y dónde quieres el resultado? Según tu ejemplo, el resultado es 15, en dónde quiere poner ese 15.
Ha valorado "Excelente" la respuesta
Dante Amor Ayuda con Macro por favor !
La macro para buscar quedaría así: Private Sub CommandButton5_Click() If TextBox1.Value = "" Then 'Si el texbox esta vacío mostramos un mensaje MsgBox "Debes introducir una referencia para poder realizar la búsqueda", vbInformation, "Introduce una...
Ha cambiado su perfil.
- Ha cambiado la información de educación.
Ha cambiado su perfil.
- Lema: Mas vale preguntar que ser ignorante por siempre.
Ha valorado "Buena" la respuesta
Macro para ocultar barra de menú completa solo en un libro.
Te comento que no se si te funcione esta macro, ya que yo tengo 2007.. prueba y me comentas que tal... Sub Autoabrir() ' Corre la macro, esconder la barra de herramientas 3 segundo desde ahora. Application. OnTime Now + TimeValue("00:00:03"),...
Ha empezado a seguir a 
Claudia Castellano
Claudia Castellano
Ha preguntado en el tema en
Microsoft Excel
Modificación de marco en VB.
Buen dia, espero y puedas ayudarme. Te explico; He realizado poco a poco una macro en excel para buscar en una ruta x el valor de una celda ("G9" en este ejemplo); Private Sub CommandButton54_Click() ChDir "ruta x" nombre = Range("G9").Value Set fso...
Sin respuestas
Ha valorado "Excelente" la respuesta
Macro para buscar valor en celda, buscarlo en una carpeta y abrir el archivo.
Para utilizar el comando shell debes hacerlo de esta forma: Sub otra() ChDir "C:\Users\xxxxxx\Documents\Entrega de Turno\Etiquetas de Resinas\" nombre = Range("G9").Value Shell "winword.exe " & nombre End Sub Es importante que el nombre del archivo,...
Ha empezado a seguir a 
Dante Amor
Dante Amor
Educación
-
Universidad tecnologica de Leon
Ingenieria Industrial , 2009 - 2012