oronamar

drinfierno respondió: Bueno al grano : Para listar una tabla en un grid. Lo puedes hacer de esta manera Primero que el Recordset debe estar cagado con la tabla Listar Posteriormente Poner Set DataGrid1.Datasource = Nombre del Recordset si no puedes conectarte o tienes...

morenesi respondió: Puedes hacer un back up y restaurar a tu nueva bd te paso un link donde esta muy claramente explicado con todo y pantallas, que aunque esta explicado para sql 2005 express la interface gráfica es casi la misma al 2000....

jclaveria respondió: Esto es lo que tu tienes... Rs. Open "insert into tabla1 (campo1, campo2)VALUES('value1', ' value2')", cn1, adOpenStatic, adLockBatchOptimistic, Para hacer la sustitución que necesitas deberías poner: rs.Open...

jrgces respondió: Yo escribí un procedimiento que creo que hace lo que necesitas, mira si te sirve: http://www.jrgc.es/vba01.htm#vba01_12

Anónimo respondió: Como tenés armada la instrucción, igualmente es más rápido que utilices la instrucción Contar. Si la misma es =Contar.Si(rango,criterio) Y deberías ejecutarla con cada uno de los códigos que tengas...

Juan Carlos González Chavarría respondió: a), lógicamente tienes que decirle que el libro contiene o no más hojas. Prueba añadiendo este pedazo de código: Dim SheetNames() As String Dim SheetHidden() As Boolean Dim i As Integer Dim SheetCount As Integer Dim VisibleWins As Integer Dim Item As...

Elsa Matilde respondió: No seré un 'chico' pero creo que la siguiente rutina te servirá. Si encuentra el coment te indicará la hoja y si no lo encuentra te lo notificará. Private Sub CommandButton1_Click() Dim codi As Byte 'recorre todas las hojas For Each sh In Sheets...

Anónimo respondió: Tomando tu código, fíjate si te sirva algo como Private Sub CommandButton1_Click() dim tBuscar as string, w as Worksheet tBuscar = Textbox1.Value On Error GoTo errando for each w in Thisworkbook.WorkSheets w.Cells.Find(What:=tBuscar,...