Abraham Valencia

Hasta ahí veo que has llenado tu "Combobox", si lo que deseas es que ahora tu recordset tenga solo el registro que elijas en el "Combobox" (en el evento que creas conveniente), tu sentencia SQL debe ser algo así: "Select * From Productos where ID='"...

Si tu hoja y/o las celdas en las que quieres hacer cambios a través de VBA están protegidas, para que no te arroje ningún error, debe desprotegerlas y protegerlas. Prueba algo así: Worksheets("Nombre_de_tu_hoja").Unprotect Password:="tu_contraseña"...

Al proteger una hoja no debería haber problemas con las fórmulas, a menos que algo no estés comentando. No olvides que, así protejas las hojas, usando en cada celda "Formato de celdas" - "Proteger" quitando el "check" de "Bloqueada" puedes seguir...

Siendo sábado, me di tiempo de hacer esto: Sub Guardando() Dim Nombredelescritorio As String, Formatodia As String, Formatohora As String Application.ScreenUpdating = False Sheets("Hoja1").PrintOut Copies:=1, Collate:=True Let Nombredelescritorio =...

Cuando en una fórmula los rangos de las celdas están precedidos del símbolo del dolar ($) al arrastrar dicha fórmula dichos rango se quedan como "fijos": $A$1 - Fija rango completo $A1 - Fija la columna A$1 - Fija la fila

Prueba con algo así: Sub Ejemplo() Dim ValordeMsgbox As Integer Let ValordeMsgbox = MsgBox("¿Desea activar la macro?", vbYesNo) If ValordeMsgbox = vbYes Then Call tu_macro Exit Sub End If MsgBox "La macro no se activará" End Sub Comentas Abraham Valencia

¿Y por qué no te es útil la función "Suma"? Abraham Valencia

Las tablas dinámicas tiene una herramienta llamada "campo calculado", sugiero explorar con ello y luego nos comentas si te fue útil.

Estas usando un evento del modulo del libro (archivo) que se activa al seleccionar una hoja del libro, no una celda, debes usar un evento del modulo de la hoja en donde tienes tu Tabla Dinámica: Private Sub Worksheet_SelectionChange(ByVal Target As...

Claro Abraham Valencia