Luis_P

Luis_P

 100K puntos  Chile @luis_p desde - visto

Respuestas

Respuesta en a

Macro para cambiar ruta de conexión de datos de Microsoft query

Prueba asi: consulta = ThisWorkbook.Path & "\Libro1.xls" rutaconsulta = ThisWorkbook.Path Sheets("PRUEBA").Select With ActiveSheet.ListObjects.Add(SourceType:=0, Source:=Array(Array( _ "ODBC;DSN=Excel Files;DBQ=" & consulta & ";DefaultDir=" &...
Respuesta en a

Valor de celda en textbox

Entonces asignale al control la referencia de esa celda, text=range("C1"), suponiendo que que en c1 esta su formula
Respuesta en a

Crear columna "Precio Unitario" a MSFlexgrid en ejecución.

Vas a tener que hacer un sub independiente para ello en el que una vez terminada la carga de la grilla haga lo sgte: 1.- Inserte nueva columna 2. Mediante bucle recorra cada una de las filas de la grilla y ponga el valor de la division en la columna...
Respuesta en a

Proyecto de lectura. Cómo relaciono información de un formulario con otro.

Declara una variable public y asignale su valor +1 en cada check que te interesa contar Ejemplo En el evento click del check pondrias cuenta=cuenta+1 Y asi con los demas que necesitas, al ser cuenta una variable public, su alcance es global en todo...
Respuesta en a

Guardar datos de un textbox en un txt

Si claro, eso pasa por que le estas pasando al text una nueva cadena sin contemplar la cadena existente en el text Para que eso no te ocurra debes hacer lo sgtes: text1=text1 & " " & nuevo texto

Formulario para eventos en segundo plano

primero tu proyecto no debe iniciar con un form sino con un procedimiento sub main en un modulo declaras el sub main sub main() ... aca pones la llamada al primer evento que debe realizar tu programa end sub Luego solo es cosa de hacer las llamadas...
Respuesta en a

Tomar ciertos dígitos de un texbox y copiarlos en otro texbox

Para ello utilizaremos el evento KeyPress del text ingreso Asi: Private Sub ingreso_KeyPress(KeyAscii As Integer) '4c7569735f50 If Len(Trim(ingreso)) = 7 Then cod = Mid(Trim(ingreso), 2, 1) suc = Mid(Trim(ingreso), 3, 1) End If End Sub Asi al digitar...
Respuesta en a

Configuración de MSComm en vb6 para la recepción de datos asíncrona

Revisa los parametros RThreshold, SThreshold Estas dos propiedades especifican el número de caracteres que deben estar presentes en los Buffers de Recepción y Transmisión respectivamente, para que se produzca el evento OnComm relativo a recepción y...
Respuesta en a

Copiar texto en portapapeles

Prueba a limpiar el portapapeles antes de pasarle otro string Clipboard. Clear Clipboard. SetText (Text2.Text) A mi así me funciona ok
Respuesta en a

Ayuda con conexión en visual basic 6.0

Revisa acá http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/296-connectionstring-ado.htm#1

Suscríbete RSS