Dante Amor

Quedaría así: Private Sub Worksheet_Change(ByVal Target As Range) 'Act.Por.Dante Amor If Not Application.Intersect(Target, Range("E:E")) Is Nothing Then ActiveSheet.Unprotect Password:="123" ''AQUI CONTRASEÑA If Range("j1") = "" Then MsgBox " Se te...

H o l a: Ya no entendí si quieres pasarlo de la celda al textbox o del textbox a la celda. En cualquier caso tienes que verificar si el dato es numérico. Por ejemplo de la celda al textbox: Private Sub UserForm_activate() 'Por.Dante Amor If...

H o l a: ¿Las 2 tablas están en la misma hoja? Puedes poner la imagen pero que se vean las letras de las columnas y los números de fila de excel.

H o l a: Si vas a filtrar 4 columnas, tenemos que realizar un ciclo para revisar cada una de las 4 columnas, no podrías utilizar un autofiltro o un filtro avanzado ya que si filtras por la primera columna, no podrás revisar los datos de las otras 3...

H o l a: Private Sub Worksheet_Change(ByVal Target As Range) 'Act.Por.Dante Amor Application.ScreenUpdating = False If Target.Count > 1 Then Exit Sub If Not Intersect(Target, Columns("B")) Is Nothing Then If Target = "" Then Exit Sub ruta =...

H o l a: Te anexo la macro, no mencionas exactamente qué quieres en el aviso, te estoy poniendo un aviso con la suma alcanzada y desde cuál celda y hasta cuál celda se sumaron. Sub SumarHastaLimite() 'Por.Dante Amor una = True For Each c In...

H o l a: Te anexo las 2 macros. Para crear un nueva carpeta en mis documentos: Sub NuevaEnDocumentos() 'Por.Dante Amor ruta = CreateObject("wscript.shell").SpecialFolders("mydocuments") & "\" carpeta = "Nueva" If Dir(ruta & carpeta, vbDirectory) = ""...

H o l a: Envíame tu archivo con datos de ejemplo, si ya tienes el formulario, también me lo envías. Recuerda poner tu nombre de usuario en el asunto del correo. F e l i z N a v i d a d y P r ó s p e r o A ñ o N u e v o!

H o l a: La siguiente puede ser una opción. Si solamente quieres que se utilice en una computadora, entonces pon el número de serie dentro del código del formulario, si el número de serie de la computadora es igual número de serie que tiene el...

H o l a: Te anexo un par de macro para que revises cuál te funciona mejor. Según tu imagen, la fecha la tienes en la columna D, y quieres la semana en la A, el mes en la B y el día en la C. Macro1, el número de semana se considera empezando la semana...