royb

royb

 España @royb desde - visto
Preguntar

Preguntas esperando respuesta

Actividad pública reciente

Ha valorado "Excelente" la respuesta

Llenar de color unas celdas según parámetros

respondió: No me das muchas referencias de la ubicación de los datos, así que seguí este ejemplo y luego lo adaptás a tu hoja Los meses hay que trabajarlos con nros, no con texto. Entonces en D2 coloqué nro inicial (3 por marzo) y en E2 también 3 (por nro de...
Ha preguntado en el tema en

Llenar de color una celda hasta otra

Hola. Espero me puedan aquudar necesito llenar de color d una celda a otra dependiendo los dos parametros q le s mande un o es para ver d dond comenza y el otro a dond termina por ejemplo tengo la siguiente filass con los meses enero febre marzo...
Sin respuestas
Ha preguntado en el tema en

Ruta mas corta. Vb6.0

Saludos, tengo un que entregar un proyecto en algunas semans y no tengo mucha experiencia en programacion, necesito hallar las rutas mas cortar entre un origen y un destino. Conosco visual basic 6.0. Si alguien me puede ayudar. Gracias ojala me...
Sin respuestas
Ha preguntado en el tema en

Ruta mas corta

Saludos, tengo un que entregar un proyecto en algunas semans y no tengo mucha experiencia en programacion, necesito hallar las rutas mas cortar entre un origen y un destino. Conos visual basic 6.0. Si alguien me puede ayudar. Gracias ojala me puedan...
Sin respuestas
Ha valorado "Buena" la respuesta

Procedimiento demasiado largo

respondió: Yo lo he probado como lo has puesto tu y me da bien, excepto esto call Sub Worksheet_Change1(Target)
Ha valorado "Excelente" la respuesta

Ocultar y mostrar filas según un parámetro.

respondió: Como no indicas cuál será el parámetro, te dejo unas instrucciones. Estimo que esto lo necesitarás en alguna macro iniciada. If Sheets("Hoja2").Range("B3") = 5 Then Sheets("Hoja1").Range("A4").EntireRow.Hidden = True Else...
Ha empezado a seguir a
Ha preguntado en el tema en

Procedimiento demasiado largo erro de compilación

Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$C$4" Then Select Case Target.Value Case Is = 1 Range("E4:N4").Interior.ColorIndex = 4 Range("Q4:DT4").Interior.ColorIndex = 0 Case Is = 2 Range("E4:Z4").Interior.ColorIndex = 4...