Macro para acceso a determinadas hojas

Preguntas y respuestas relacionadas

Me impide copiar y pegar en todo el libro aunque desproteja la hoja

Esta macro la tengo en ThisWorkbook: Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean) Select Case Sh.Name Case "Contado", "Adra Paco", "Balerma Trini", "El Ejido Adelina", "Berja Gador", "Adra...
2 respuestas

Como poner dos macros o más en thisworkbook de excel sin que creen conflicto

¿En thisworkbook tengo una macro y al insertar otra abajo dejan de funcionar . Como hago para poner dos o más y que puedan trabajar sin crear conflicto?
2 respuestas

Macro para bloquear celda después de escribir

Como puedo realizar un macro en donde al ingresar un dato en todas las celdas de la columna "A", aparezca la fecha en las celdas de la columna "B" y la hora en las celdas de la columna "C" y que además al ingresar el dato en la celdas de la Columa...
1 respuesta

No guardar si hay celda vacía

Necesito una rutina como esta Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) 'selecciono la hoja que debe controlar Sheets("Hoja2").Select If Range("B8") = "" Or Range("O8") = "" Then MsgBox "Hay celdas vacías- no se...
1 respuesta

Rango a ordenar con macro

Tengo el siguiente código: Private Sub ORAZ() Sheets("Hoja 1").Select A = InputBox("INGRESA LA LETRA DE LA COLUMNA QUE QUIERES ORDENAR", "ORDENAR A/Z", , 500, 500) ActiveSheet.Unprotect "ábrete" ActiveWorkbook.Worksheets("Hoja...
1 respuesta

¿Hay una macro que pueda ocultar filas bloqueadas?

Como estasexperto: Soy Javier, oye te expongo el siguiente problema, que ojala te des tiempo de contestarme: Tengo una hoja de calculo con un macro que me sirve muy bien paro ocultar filas con valor cero que "no" están bloqueadas (seguridad), utilizo...
2 respuestas

Macro para proteger una celda de excel inmediatamente después de entrar (copiar) algún contenido en ella

Me gustaría me ayuden a completar esta macro Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("E13:J13")) Is Nothing Then ActiveSheet.Unprotect Target.Locked = True ActiveSheet.Protect End If End Sub Lo que hace es...
2 respuestas

Permitir algunas acciones en una excel protegida

Quiero conocer qué eventos son los que en una hoja protegida permitan a los usuarios realizar las siguientes acciones: Utilizar el autofiltro que ya está activado Cambiar alto y ancho columna Borrar e insertar lineas Deshacer acciones
1 respuesta

Botón imprimir con macro

Necesito que esta macro: ActiveSheet. Unprotect "clave" Dim Mensaje, Resp Dim Total As Double Total = WorksheetFunction.Sum(Range("E14:E25")) Mensaje = "El total es " & Total Mensaje = Mensaje & " ¿Desea Imprimir?" Resp = MsgBox(Mensaje, vbQuestion +...
1 respuesta

Activar o desactivar pestañas según contenido de un rango

Tengo el siguiente código: Private Sub CommandButton1_Click() If Range("B4:B10") = "ACAPULCO" Then Sheets("ACAPULCO").Visible = True Else Sheets("ACAPULCO").Visible = False End If El cual me indica error 13 no coinciden los tipos Lo que deseo es que...
1 respuesta
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas de los temas