Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » Visual Basic » como puedo escribir una instrucción en VB en varias lineas?

Visual Basic - como puedo escribir una instrucción en VB en varias lineas?

Life is soft - evento anual de software empresarial
Volver
Nuevo Tema
<<>>
 
Vista:

como puedo escribir una instrucción en VB en varias lineas?

Publicado por CATALINA (4 intervenciones) el 23/05/2017 21:19:03
Hola, tengo una duda como puedo escribir una instrucción en VB en varias lineas?, ya he probado con & _ y no me funciona, se debe colocar algún código antes? cualquier comentario sería de gran ayuda
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Andres Leonardo
Val: 3.117
Oro
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

como puedo escribir una instrucción en VB en varias lineas?

Publicado por Andres Leonardo (1798 intervenciones) el 24/05/2017 00:43:18
Su lo que vas a hacer es concatenar el texto si funciona
1
2
MsgBox "Esta es una instruccion " & _
          " Escrita en Varias Lineas"

Puedes poner que quieres escribir ... saluos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Antonio Masana
Val: 1.259
Plata
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

como puedo escribir una instrucción en VB en varias lineas?

Publicado por Antonio Masana (558 intervenciones) el 24/05/2017 06:16:46
Quizas te refieres a esto:
1
2
3
4
Private Sub Command1_Click()
    Text1.Text = 100 * _
                 200
End Sub

o esto
1
2
3
4
Private Sub Command1_Click()
    Text1.Text = Text2.Text * _
                 Text3.Text
End Sub

Saludos.
\\//_
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

como puedo escribir una instrucción en VB en varias lineas?

Publicado por catalina (4 intervenciones) el 24/05/2017 22:02:13
Antonio Masana lo que quiero hacer es dividir este código en dos pero VB no me deja
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Antonio Masana
Val: 1.259
Plata
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

como puedo escribir una instrucción en VB en varias lineas?

Publicado por Antonio Masana (558 intervenciones) el 25/05/2017 11:01:42
Aporta un ejemplo de código explicando detalladamente lo que deseas, por que si no das más pistas es imposible saber cual es tu problema.

Con la explicación de Andrés o la mía debería ser suficiente. Si no lo es, es porque el problema no esta bien formulado.

En tu último comentario pones "... dividir este código ..." ¿Que código?

Saludos.\\//_
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

como puedo escribir una instrucción en VB en varias lineas?

Publicado por catalina (4 intervenciones) el 25/05/2017 22:34:01
Antonio Masana estoy trabajando con el siguiente código:

1
2
3
4
5
6
7
8
9
10
Range("I1").Select
ActiveCell.FormulaR1C1 = "P3235_P3239"
Columns("I:I").Select
 
For i = 2 To ultima
 
    Cells(i, 9).Select
    ActiveCell.FormulaR1C1 = "=IF(OR(AND(OR([" & NombreArchivo & "]INNOVACION!RC17=1,[" & NombreArchivo & "]INNOVACION!RC17=0),[" & NombreArchivo & "]INNOVACION!RC17<>""""),AND(OR([" & NombreArchivo & "]INNOVACION!RC18=1,[" & NombreArchivo & "]INNOVACION!RC18=0),[" & NombreArchivo & "]INNOVACION!RC18<>""""),AND(OR([" & NombreArchivo & "]INNOVACION!RC19=1,[" & NombreArchivo & "]INNOVACION!RC19=0),[" & NombreArchivo & "]INNOVACION!RC19<>"""")),""V"",""F"")"
 
Next i


pero cuando el código lo quiero dividir en dos según lo que me indicaste tu no me funciona, según lo que tu me indicaste
y no encuentro el error que estoy cometiendo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Antonio Masana
Val: 1.259
Plata
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

como puedo escribir una instrucción en VB en varias lineas?

Publicado por Antonio Masana (558 intervenciones) el 26/05/2017 08:10:06
La forma de poner el comando en varias líneas es así

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Sub Macro1()
    Dim i As Integer
 
    Sheets("Hoja3").Select
 
    Range("I1").Select
    ActiveCell.FormulaR1C1 = "P3235_P3239"
    Columns("I:I").Select
 
    NombreArchivo = "NombreArchivo"
 
    Range("I2").Select
    For i = 2 To ultima
        Range("I" & i).Select
 
        ActiveCell.FormulaR1C1 = "=IF(OR(AND(OR([" & NombreArchivo & _
                                  "]INNOVACION!RC17=1,[" & NombreArchivo & _
                                  "]INNOVACION!RC17=0),[" & NombreArchivo & _
                                  "]INNOVACION!RC17<>""""),AND(OR([" & NombreArchivo & _
                                  "]INNOVACION!RC18=1,[" & NombreArchivo & _
                                  "]INNOVACION!RC18=0),[" & NombreArchivo & _
                                  "]INNOVACION!RC18<>""""),AND(OR([" & NombreArchivo & _
                                  "]INNOVACION!RC19=1,[" & NombreArchivo & _
                                  "]INNOVACION!RC19=0),[" & NombreArchivo & _
                                  "]INNOVACION!RC19<>"""")),""V"",""F"")"
 
    Next
End Sub

Y el problema no radica en que no te funcione por poner varias lineas, el problema es que esto es caótico, la fórmula no tiene ningún sentido.

Para empezar qué significa esto: "=IF(OR(AND(OR([" es que ni yo lo entiendo.

Y el final de la fórmula es el no va más de lo abstracto N!$Q17<>"");Y(O(

Esto es el resultado de la macro, donde pone NombreArchivo debería poner el nombre de un archivo que no se y el valor de la variable ultima tampoco:

1
=SI(O(Y(O([NombreArchivo]INNOVACION!$Q17=1;[NombreArchivo]INNOVACION!$Q17=0);[NombreArchivo]INNOVACION!$Q17<>"");Y(O(

Ponte en la hoja de calculo, pon a grabar macro y escribe la fórmula en una celda y veras que cualquier parecido a lo tuyo es pura casualidad.

Saludos.
\\//_
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar