Jump to content

howling

Members
  • Content Count

    31
  • Joined

  • Last visited

About howling

  • Rank
    Member

Converted

  • Campos
    ;
  1. gracias antoni por tu pronta respuesta y tu tiempo quiero decirte que use la macros con los cambios que le hiciste y si bien es cierto que se soluciono el problema de los rangos y tambien quedo perfecto garcias por tu ayuda antoni eeeerrrrrreeeesssss.........grande al igual que el resto de expertos de este foro ggggggrrrrraaaaccccciiiiiiiaaaaaaaasssssssss............................. y con esto doy por solucionado mi problema
  2. buenas tardes antoni gracias por tu tiempo ahora subo el archivo LIBRO.xlsm
  3. buenas noches vuelvo con una duda bastante loca en el evento worksheet_ change mi pregunta es la siguiente ¿es posible que un evento que un evento que esta en una hoja se ejecute en varios rangos de celdas? mi evento empieza de esta forma: Private Sub Worksheet_Change(ByVal Target As Range) If Not Application.Intersect(Target, Range("S14:AW14")) Is Nothing Then On Error GoTo Salida Select Case Target Case "N": Target.Font.Color = vbBlack: Target.Interior.Color = vbBlue Case "DA": Target.Font.Color = vbRed: Target.Interior.Color = vbYellow Case Else: GoTo Salida End Select Exit Sub Salida: Target.Font.ColorIndex = xlAutomatic Target.Interior.ColorIndex = xlNone 'color de relleno sin color End If End Sub cuando intento colocarle varios rangos solo me deja hasta dos y del tercero en adelante me envia error bueno espero que alguien me pueda ayudar o orientarme para resolver mi nuevo dilema de ante manos gracias
  4. buenas noches antoni gracias por tu respuesta me parecio buena tu idea lo adaptare a mi macro y lo utilizare bien gracias por tu tiempo
  5. buen dia isidrod gracias lo tendre en consideracion
  6. BUENAS TARDES ANTONI GRACIAS POR TU TIEMPO Y DISCULPA LA DEMORA, LO INTENTE CON LO QUE ME DIJISTE PERO EL CODIGO NO ME RESULTA ENVIÓ EL ARCHIVO ADJUNTO PARA VER SI ME PUEDES AYUDAR O ALGUIEN MAS GRACIAS DE ANTE MANO PAUTA MENSUAL.xlsm
  7. BUENAS SOLO ESCRIBO PARA UNA SENCILLA PREGUNTA SERA POSIBLE MARCAR 2 CASILLAS DE BOTONES DE OPCIÓN AL MISMO TIEMPO UN FORMULARIO Y QUE SE EJECUTE LA MACRO CON LAS CASILLAS MARCADAS?
  8. Buenas noches expertos estoy de vuelta para pedir ayuda a ustedes tengo una macro que estoy actualizando, es decir, cambiando el diseño del formulario pero a la macro en si le hice unas pequeñas modificaciones que les presento a continuación en el archivo adjunto. la macro se basa en crear una pauta mensual con turnos rotativos de "M"(mañana) y "T" (tarde) asi es como funciona la macro al habrir el formulario se debe marcar el boton de opcion 1 (alejandro muñoz), despues en la lista despeglable el numero 1 que crresponderia a los dias de donde empezara la macro despues de eso solo ingresar y debe verse una lista hacia la derecha con letras "M" y "L" la cosa es que solo me envia la primera linea pero el resto no y no se porque incluso no le hice grandes modificaciones espero haberme explicado bien gracias por la ayuda PAUTA MENSUAL.xlsm
  9. Gracias jsdjsd por la orientación estaba colocando las cosas donde no lo tomaba pero ya me di cuenta del error gracia a ti graciad
  10. Gracias jsdjsd por la orientación estaba colocando las cosas donde no lo tomaba pero ya me di cuenta del error gracia a ti graciad
  11. buenas tardes genios programadores tengo una pregunta ¿es posible abrir un formulario desde un OptionButton?
  12. bigpetroman gracias por tu respuesta me ayudo bastante lamento haberme demorado tanto en responder gracias por la ayuda y a ti tambien antoni gracias doy por solucionado el tema
  13. buenas tardes antoni y bigpetroman gracias por sus respuestas y tienen toda la razon, aqui les subo el archivo con la macro con la cual me ayudaron en otro foro de macros espero me puedan ayudar gracias Libro.xlsm
  14. buenas tardes necesito ayuda con un código, lo que pasa es que tengo un código que va inserto en la hoja que utilizo para datos. este código esta diseñado para hacer doble clic en una celda de una columna especifica y copia una cantidad especifica de celdas y las pega en otra hoja lo que yo nesecito es cambiar cierta linea del codigo que copia la serie de celdas en una que me copie las celdas intercaladas por ejemplo si el codigo original me copia de la celda A1 a G1 la que nesecito ahora es que me copie desde D1 pero saltandoce una celda, es decir, A1, C1, E1,G1, etc... les dejo el codigo que quiero cambiar y mas abajo la macro completa Target.Offset(0, 1).Resize(1, 12).Copy parte que quiero cambiar Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Application.ScreenUpdating = False If Target.Address Like "$B$*" Then If IsNumeric(Target) And Target <> "" Then Cancel = True Target.Offset(0, 1).Resize(1, 12).Copy fila = Sheets("Tabla").Range("A" & Rows.Count).End(xlUp).Row + 1 Sheets("Tabla").Range("B" & fila).PasteSpecial xlValues, Transpose:=True For columna = 3 To 13 Step 2 Sheets("Tabla").Range("C" & fila) = Cells(9, columna) Sheets("Tabla").Range("C" & fila + 1) = Cells(9, columna) fila = fila + 2 Next Application.CutCopyMode = False Sheets("Tabla").Activate End If End If End Sub bueno espero haberme explicado lo mejor que pueda espero me ayuden y gracias de ante mano
  15. buenas haplox gracias por la pronta respuesta solo decirte que ya lo adapte a mi macro y funciona perfectamente gracias doy por solucionado el tema
×
×
  • Create New...

Important Information

Privacy Policy


CTA Templates.png