Iniciar sesi贸n
Crear cuenta
Crear cuentaCrear cuenta| Se han encontrado 2654 coincidencias. | << >> |
| Visual Basic |
| Pregunta: | 17082 - F贸RMULAS EN EXCEL |
| Autor: | Jacobo Lopez |
| Estimados compa帽eros:
Mi problema es que tengo una plantilla de Excel con c贸digo Visual Basic. El usuario escribe la f贸rmula personalizada (es decir, una f贸rmula inentada pero con una sintaxis) en una celda, y cuando pincha en un bot贸n, se lee una BD y se va sustituyendo las f贸rmulas por el valor que procede. El problema estriba en que me gustar铆a (al igual que pasa en las funciones integradas e EXCEL) que no se perdiera el valor de la f贸mula, o sea, que al ponerte encima de la casilla, apareciera la f贸rmula en la barra de f贸rmulas. Desde que escribo el signo "=" antes de la f贸rmula, el programa me da error, porque toma la celda como vac铆a. Sin otro particular, me despido, agradeciendo de antemano su atenci贸n. | |
| Respuesta: | Dark MAC |
| Nececitas que el codigo de visual vasic tenga guardada la posicion de la celda donde pusiste la formula, y que al estar el cursor fuera de esa celda, aparesca el resultado, pero en caso contrario que aparesca la formula que va a estar guardada en un arreglo, en ese arreglo tiene que estar guardada porsicion de la celda y la formula para que se pueda con muchas celdas; me despido, bye. | |
| Pregunta: | 17139 - SALVAPANTALLAS |
| Autor: | arnold david hernandez maldonado |
| uso windows 98,tambien visual studio y quiero saber si se puede hacer un salvapantalla
| |
| Respuesta: | Xavi |
| Hola Arnold, hacer un salvapantallas es sumamente sencillo en principio. Unicamente tienes que crear un ejecutable que realice cualquier cosa, ya sea un movimento de imagen, etc...
Ese archivo, lo modificas de extension, de .exe a .scr y lo copias en el directorio del windows\system. Ya puedes ir a las propiedades y seleccionarlo de la lista de protectores de pantalla. Hay varios parametros que deverias de controlar, para saber si han seleccionado ver las propiedades, presentacion preliminar, etc... Con la instruccion command() veras que parametros solicita. Saludos | |
| Pregunta: | 17278 - ERROR 0 EN CONEXION CON SQL SERVER |
| Autor: | Jose Luis Atanasio |
| Cuando me conecto a una base de SQL Server desde Visual me da el error nro. 0. Quisiera saber que significa este error ya que no tiene descripcion y como puedo solucionarlo.
Desde ya muchas gracias. | |
| Respuesta: | Alexis Aravena Silva |
| Hola que tal
Mira el numero 0 indica que no tienes errores, a lo mejor no estas controlando bien los errores, debieras mandarme el codigo de la conexion con SQl, ya que yo programo con Vb y SQL Server 6.5 y tal vez te pueda ayudar. Un cordial saludo | |
| Pregunta: | 17292 - COMO CAPTURAR EL DOMINIO O DOMINIOS EN UNA RED LOCAL |
| Autor: | Miguel Zarate Chipana |
| hola a todos, estoy buscando la manera de capturar el Dominio de una red local en Visual Basic, dicha red tiene diferentes dominios, esto es para reguistralo en mi sistema, espero tener el apoyo de Uds. | |
| Respuesta: | Carlos Christian Molina Vega |
| Vas a tener que buscar informacion acerca de la siguiente funcion de la API
WNetOpenEnum en www.allapi.net encontraras todo | |
| Pregunta: | 17389 - ERROR 1004 EN TIEMPO DE EJECUCI贸N CON VISUAL EN EXCEL |
| Autor: | Luis del Campo O帽ate |
| Hola, os cuento mi problema. Simplemente lo que trato de hacer es seleccionar varias celdas de una hoja de excel, el problema es que con la opci贸n A, si las puedo seleccionar, pero con la opci贸n B no puedo, y la 煤nica diferencia es que en la opci贸n B, antes de ponerle las celdas que quiero seleccionar, le doy valor a la celda a8, sin embargo en la opci贸n A no le doy valor a la celda a8. Estoy haciendo pruebas, y si selecciono nada m谩s abrir la hoja si que puedo, pero si hago cualquier cosa en la hoja, ya no puedo seleccionar las celdas, aunque si en vez de varias celdas s贸lo selecciono una, se puede de las dos formas.
El error que me da es "Error 1004 en Tiempo de Ejecuci贸n Fallo en el m茅todo Range del objeto _Application" Gracias Opci贸n A Private sub Command_Click() Dim Hoja as New excel.application Hoja.visible=True Hoja.Workbooks.open "C:\Hoja.xls" Hoja.Range("A2,B4,C8").Select End Sub Opci贸n B Private sub Command_Click() Dim Hoja as New excel.application Hoja.visible=True Hoja.Workbooks.open "C:\Hoja.xls" Hoja.Range("A8").Value="VALOR" (Sin esta l铆nea s铆 funciona) Hoja.Range("A2,B4,C8").Select End Sub | |
| Respuesta: | Pedro Serrano Baizabal |
| Luis
El an谩lisis de tu problema radica en que deseas abrir un libro de excels llamado Hoja.xls que se encuentra en "C:\" si este no esta ubicado en este directorio es por eso que te manda el mensaje de error 1004 en tiempo de ejecuci贸n.Comprobe esto con el codigo siguiente: Private Sub CommandButton1_Click() Dim Hoja As New Excel.Application Hoja.Visible = True Hoja.Workbooks.Open "C:\mis documentos\Hoja.xls" 'Sheets("Hoja1").Range("A8").Value = "VALOR" 'Sheets("Hoja1").Range("A2,B4,C8").Select Hoja.Range("A8").Value = "VALOR" Hoja.Range("A2,B4,C8").Select End Sub Como puedes observar se ordena abrir el libro Hoja.xls que se encuentra en el subdirectorio mis documentos Las l铆neas de sheets("Hoja1").range pueden sustituir a Hoja.range para especificar en que hoja deseas hacer tus actividades. Espero comentarios Saludos | |
| Pregunta: | 17405 - ERROR DE AUTOMATIZACI贸N |
| Autor: | Javier Ogasawara |
| Hice esta peque帽a rutina para poder ir cargando los forms seleccion谩ndolo de un combobox (CmbForm).
Compile el programa y lo instal茅 en varias m谩quinas. En algunas me funcion贸 perfectamente, pero en otras cuando ejecuta “Set xForm = Forms.Add(CmbForm.Text)” sale el mensaje que est谩 abajo. Lo curioso es que en la m谩quina que lo ejecut茅, si lo corro desde el VisualBasic el programa corre perfectamente, pero si corro el ejecutable me aparece el mensaje y se cierra el programa. Mi pregunta es : A qu茅 se debe el problema y c贸mo puedo solucionarlo? --------------------------------------------------------------------------------------------------- Dim xForm As Form lblExiste = False For Each xForm In Forms If xForm.Name = LsvTran.SelectedItem.Key Then xForm.Show lblExiste = True Exit For End If Next xForm If Not lblExiste Then Set xForm = Forms.Add(CmbForm.Text) xForm.Caption = LblDescripcion.Caption xForm.Show End If --------------------------------------------------------------------------------------------------- El mensaje que aparece es el siguiente: Error \\\'-2147417848(80010108) Error de Automatizaci贸n | |
| Respuesta: | Jose Lara |
| A mi me sucedio lo mismo con algo parecido:
Lo solucione asi: Cada cierto numero(pueder ser 10,20,30,40,etc.) de iteracion debes parar (Tienes que probar cual te funciona, es decir, donde no te da el error) y nuevamente vuelves a llamar a la rutina. No se porque pasa, pero parece, que llega un momento donde la automatizacion se satura y EXPLOTA. Buena suerte, cualquier cosa escribeme | |
| Pregunta: | 17478 - IMPRIMIR UN ARCHIVO, PERO CON TAMA帽OS Y COLORES DE FUENTES |
| Autor: | Filiberto Ju谩rez Barrios |
| Como puedo generar un reporte o un informe desde Visual Basic 6.0, en el cu谩l se guarden los formatos de fuente (Color, tama帽o y fuente) para posteriormente abrirlo desde un RichTextBox, ya que estoy utilizando un print a un #archivo con la sintaxis de un rtf, pero al abrirlo con el RichTextBox, me lo abre como archivo de texto, pero si lo abro con WordPad de windows, me lo abre con el formato rtf como debe de ser. | |
| Respuesta: | Alfonso XIV |
| No s茅 c贸mo lo est谩s haciendo, pues no he tenido problemas con el control RichT. Lo normal para cargar un fichero rtf en ese control es usar su m茅todo .LoadFile <pathFichero>, <tipo> donde en tipo debes poner la constante "rtfRTF", aunque es el valor por defecto.
Otra fuente de problemas es que dicho control no reconoce todos los comandos est谩ndard de RTF. En el manual electr贸nico que viene con VB6 (MSDN Library) puedes encontrar los c贸digos RTF compatibles (busca RTF-Compatibilidad de c贸digo) Yo me hice un peque帽o editor de texto usando el control RichT y le puse unos botones que me permitian cambiar el color del texto, tabuladores, etc. Luego lo grabo con el m茅todo SaveFile como rtf. El fichero producido lo abro con NotePad (S铆, con 茅l) y como no puede traducir los c贸digos RTF, me los muestra como texto. Tomo nota y lo empleo en la salida de mis textos formateados. 隆Mano de Santo! | |
| Pregunta: | 17485 - VISUAL BASIC 6.0, ACCESS 2000, ADO Y CRYSTAL REPORT 6.0 |
| Autor: | Miguel Peredo |
| Hola, estoy creando un programa en Visual Basic 6.0 usando el motor ADO y bases de datos Access 2000...
Mi problema lo encontre al intentar usar Crystal Reports 6.0, debido a que este no me reconoce las BD de Access 2000... y el otro problema es que trabajo con ADO sin (obviamente) usar Controles Data. Como lo hago? hay alguna soluci贸n? que me recomiendas? 驴sugerencias? Adios y Saludos gracias. | |
| Respuesta: | ilp ilp |
| conexiona crystal por dsn a la bd luego create una funcion a la q mandar los procedimientos de filtrado del tipo:
Public Sub LanzaInforme(ByVal r As String, ByVal p1 As Variant, ByVal p2 As Variant) Dim p As Variant Dim n As Integer 'Conexi贸n con el servidor On Error GoTo ErrorLanzandoInforme Screen.MousePointer = vbHourglass If frmMain.cryInforme.Connect = "" Then frmMain.cryInforme.Connect = "ODBC;DSN=ASIGNA;usr=guest" End If frmMain.cryInforme.ReportFileName = DirReport & r 'Comprobar y liberar par谩metros frmMain.cryInforme.RetrieveStoredProcParams If InStr(p1, "卢") Then For n = 1 To CountVar(p1, "卢") p = LoadVar(p1, n, "卢") If IsDate(p) Then p = Format(p, FECHA_CRYSTAL) If Not IsNull(p) Then frmMain.cryInforme.StoredProcParam(n - 1) = p Next n Else If IsDate(p1) Then p1 = Format(p1, FECHA_CRYSTAL) If IsDate(p2) Then p2 = Format(p2, FECHA_CRYSTAL) If Not IsNull(p1) Then frmMain.cryInforme.StoredProcParam(0) = p1 If Not IsNull(p2) Then frmMain.cryInforme.StoredProcParam(1) = p2 End If frmMain.cryInforme.WindowTitle = LoadVar(r, 1, ".") frmMain.cryInforme.PrintReport FinInforme: Screen.MousePointer = vbDefault Exit Sub ErrorLanzandoInforme: Screen.MousePointer = vbDefault MsgBox frmMain.cryInforme.LastErrorString & vbCrLf & error, vbCritical End Sub | |
| Pregunta: | 17513 - 驴C贸MO UTILIZAR LA CLASE DIRECTSR1 Y EL CONTROL VCOMMAND |
| Autor: | DANIEL gramajo |
| Por favor si alguien sabe como utilizar la clase DirectSR1 que sirve para dictados en multimedia y los controles Vcommand y Vdict1 en Visual Basic, se lo agradecer铆a mucho, he tratado utilizando los metodos Activate y Deactivate pero no logro obtener el texto del dictado que se ingresa por el microfono. Gracias de antemano | |
| Respuesta: | Charly AT |
| El uso del control DirectSR es sencillo, e incluso pienso que lo has estado haciendo bien ya que no te bota ningun error al momento del dictado, pero el problema en si es otro.... puede ser que no te funcione por que el motor de reconocimiento de voz esta en ingl猫s por que no existe una versi貌n en espa帽ol, a霉n... o simplemente algun defecto en el micro por que hay que configurarlo para que pueda utilizarse. | |
| Pregunta: | 17537 - EQUALIZADORES |
| Autor: | Arnold Hernandez |
| soy usuario de windows 98 y utilizo visual studio 6.0
y estoy realizando una aplicacion en visual basic,estoy haciendo un programa para escuchar musica,utilizo media player y tengo una pregunta,como hago paraponer equalizadores o unas barritas que se mueven de acuerdo a la intensidad del sonido | |
| Respuesta: | hombre lobo |
| ok... man.. para realizar tal accion analizador de espectrum.. para ello tienes que hacer una serie de llamadas a apis para que realizen el efecto.. pero para no complicartela existen .DLL s que hacen el trabajo por ti solo tienes que manejarlos...
aqui esta un lin muy bueno www.fmod.org o sino visita la pagina de codigo fuenta mas completa www.planet-source-code.com | |
| |< << 182 183 184 185 186 187 188 189 190 191 192 >> >| |