Respuesta
en
Microsoft Excel
y en 4 temas más
a
Macro que se bloquee después de escribir valor y para editar solicite contraseña
Realiza lo siguiente: 1. Selecciona la hoja donde quieres que funcione. En mi ejemplo voy a utilizar la "Hoja4" 2. Selecciona el rango de celdas J63:L72 3. En el Menú Formato, Formato de Celdas, Proteger, desactiva la casilla Bloqueada y presiona...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Tengo un inconveniente al pegar la información en word
Esta línea significa que va a pegar en lo que hayas seleccionado en word: WordApp. Selection. PasteAndFormat 13 Supongo que si tienes seleccionado todo el texto de word, entonces al momento de pegar, sobreescribe lo que traes en memoria sobre word....
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Rutas relativas con VBA en excel y dropbox
Puedes poner algunos ejemplos de las rutas. Una opción es que editen la ruta en una celda, en una hoja de excel. Otra opción es que la carpeta sea el escritorio. Con las siguiente instrucción obtienes la carpeta del escritorio del computador donde...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
Excel VBA. Función Index/Match en macro
Tu fórmula es equivalente a BuscarV: =BUSCARV(A2;Tablas!$O$6:$Q$8;3;1) Si quieres el código para poner todas las fórmulas en la columna B hasta donde la columna A tenga datos: Sub Formula1() With Range("B2:B" & Range("A" & Rows.Count).End(3).Row)...
Respuesta
en
VBA
y en 3 temas más
a
Código VBA se atasca al ejecutar
Vamos a mover esta línea al inicio del código: Application.ScreenUpdating = False Prueba nuevamente: Sub AutoSuma() Dim FilaSumas As Integer Dim sngAnchoTotal As Long, sngAnchoCelda As Long, sngAlto As Long Dim n As Long, i As Long '...
Respuesta
en
Visual Basic
y en 2 temas más
a
Impresión no funciona en vba
¿Ya con un macro anterior sí pudiste imprimir? ¿O siempre has tenido el problema? A manera de prueba, intenta imprimir la hoja sin pegar datos. Sub FORMULA Dim ruta As String Dim WordApp As Object ruta= "C:\Users\Laura\Dropbox\FORMULA.docx" ' Set...
Respuesta
en
Visual Basic
y en 1 temas más
a
Auto ajustar celdas combinadas con VBA
Prueba esto, va de la fila 13 a la 50 Sub combinar_celdas() Dim sngAnchoTotal As Long, sngAnchoCelda As Long, sngAlto As Long Dim n As Long, i As Long ' Application.ScreenUpdating = False For i = 13 To 50 If ActiveSheet.Range("B" & i & ":J" &...
Respuesta
en
Microsoft Excel
y en 2 temas más
a
¿Cómo hacer una macro de una celda que cuente registros solo con VBA?
El evento Change se utiliza para ejecutar un código cuando modificas una celda. Te explico por qué se "cuelga" la macro. Pusiste la línea: ws.Range("B3") = Application.WorksheetFunction.CountA(ws.Range("B6:B1048576")) Eso significa, que modificas la...
Respuesta
en
Visual Basic
y en 3 temas más
a
Creación de archivo aún existiendo el archivo vba
Estás segura que sí existe el archivo. Ejecuta la macro paso a paso y revisa que efectivamente esté entrando a la parte inicial del If If archi <> "" Then Set WordApp = CreateObject("word.Application") 'Abre archivo en la ruta y con el número...
Respuesta
en
Microsoft Excel
y en 4 temas más
a
¿Cómo arrastrar una fórmula hasta la ultima fila con datos? VBA pero los datos de referencia están en otra hoja
¿Cómo saber que debe arrastrar la fórmula hasta la celda A35?