Walberto Rodriguez Torres

James Bond respondió: Solo hay dos formas la primera o deshabilitas en todas las computadoras la opción de seguridad que pide confirmar el uso de macros o bien te consigues un certificado de seguridad para tus macros con ese ninguna maquina te pondrá ese mensaje, a otra...

Dante Amor respondió: Debes hacer referencia a la hoja en cada línea, puede ser así: Private Sub CommandButton1_Click() 'siguiente fila hace que me agregue una línea en la tabla inventario With Worksheets("ENTRADAS") .Range("A8").EntireRow.Insert 'hace que en cada parte...

Dante Amor respondió: Eso es porque utilizas la coma (, ) como separador decimal, entonces podrías intentar algo como esto: Hoja6.Cells(Fila, 4) = CDbl(Replace(Me. TextBox106, ".", ",")) ' PRIMERA NOTA

Dante Amor respondió: " A la hora de guardar las notas en la hoja de calificaciones" No entiendo cuál es el problema. - ¿Pasar los datos de los textbox a la hoja? ¿O Pasar los datos de la hoja a los textbox? - ¿El código te envía un error? ¿Qué dice el error? ¿En cuál...

Dante Amor respondió: Set rango = P.Range("A:A").Find(What:=usuario, LookAt:=xlWhole, LookIn:=xlValues) If usuario = P.Range("A" & rango.Row) El error es porque si el dato no existe, entonces en el objeto "range" no traes nada . En la línea Usuario = P.range te envía...

Dante Amor respondió: Con lo siguiente puedes pegar con la hoja protegida y oculta. No es necesario hacer visible la hoja. No mencionaste en dónde quieres pegar, entonces te puse un ejemplo, cambia "abc" por el password que desees. Sub nuevoingreso() ' nuevoingreso Macro...