** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - Salto de Línea por Defecto
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoSalto de Línea por Defecto

 Responder Responder
Autor
Mensaje
rafaservi Ver desplegable
Habitual
Habitual


Unido: 18/Noviembre/2010
Localización: España
Estado: Sin conexión
Puntos: 139
Enlace directo a este mensaje Tema: Salto de Línea por Defecto
    Enviado: 18/Febrero/2020 a las 17:41
Hola a todos.

Tengo una tabla con un campo de texto de 255 caracteres.
Me gustaría que en el diseño de la tabla, en el campo en cuestión, en el apartado "Valor predeterminado", dentro de las propiedades del campo, pueda incluir un texto en el que haya varios saltos de línea entre las frases del mismo.


Al igual y por otra parte, he conseguido hacer esto mismo al dar valor a ese campo con código. Es decir...
Me.FormaPago = "20% al aceptar presupuesto. " & vbCrLf & "70% durante la instalación." & vbCrLf & "10% Al finalizar obra."
De forma que al ver el campo en pantalla o imprimir aparece de la forma ...
20% al aceptar presupuesto.
70% durante la instalación.
10% Al finalizar obra.

Si edito el campo en un formulario puedo añadir los saltos simplemente pulsando Enter pero me gustaría que ya salieran por defecto.


Un saludo y gracias.
Arriba
javier.mil Ver desplegable
Colaborador
Colaborador
Avatar

Unido: 10/Agosto/2005
Localización: España
Estado: Sin conexión
Puntos: 4830
Enlace directo a este mensaje Enviado: 19/Febrero/2020 a las 16:24
Quizás una solución sencilla seria tener varios campos de texto , donde en cada campo de texto poder 1 sola linea.....  luego al final unir todos los campos de texto en uno solo.


Ejemplo:
Primera linea Me.txtLinea_1 = "20% al aceptar presupuesto"
Segunda linea Me.txtLinea_2 = "70% durante la instalación."
....
etc
Décima linea Me.TxtxLinea_10 = "Lo que sea...."

Linea a mostrar
Me.txtMostrarResultadoFinal = Me.txtLinea_1  & vbCrLf & Me.txtLinea_2 & vbCrLf & ..... etc....& vbCrLf & Me.txtLinea_10

Msgbox Me.txtMostrarResultadoFinal



Arriba
rafaservi Ver desplegable
Habitual
Habitual


Unido: 18/Noviembre/2010
Localización: España
Estado: Sin conexión
Puntos: 139
Enlace directo a este mensaje Enviado: 19/Febrero/2020 a las 18:24
Gracias Javier.

Pero el problema lo tendría en saber cuantos (campos en este caso) necesitaría.

Lo que he hecho es hacerlo de forma manual, es decir, tengo el campo de texto de la tabla con 255 caracteres y cuando creo un nuevo registro de esa tabla, al hacerlo con código vB (INSERT INTO), sí añado el texto con los saltos de línea poque sí me deja...

FormaPago = "30% Aceptación del Presupuesto." & vbCrLf &  _
                      "60% Certificaciones por Obra ejecutada." & vbCrLf & _
                      "10% Finalización Obra."
cSQL = "INSERT INTO Presupuesto ( PresupuestoPR, ObservaciónPagoPR ) VALUES ( 1" & _
             ", """ & FormaPago & """ );"
DoCmd.RunSQL cSQL


Muchas gracias. Caso cerrado.
Arriba
Maverick2019 Ver desplegable
Habitual
Habitual


Unido: 10/Junio/2019
Localización: Madrid
Estado: Sin conexión
Puntos: 145
Enlace directo a este mensaje Enviado: 20/Febrero/2020 a las 11:18
Hola
Prueba a generar el texto en una variable de texto (concatenando los vbCrLf o los chr(10) y chr(13) y asignarla al campo. Eso si, te recomiendio que hagas un left de 255 posiciones para que no te casque por la limitación de tamaño.

Salu2,
Arriba
rafaservi Ver desplegable
Habitual
Habitual


Unido: 18/Noviembre/2010
Localización: España
Estado: Sin conexión
Puntos: 139
Enlace directo a este mensaje Enviado: 21/Febrero/2020 a las 17:59
Gracias Maverick.
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable