Tema Objeto Range - row

Que pasa con la Datagrid Ahora, en .net

Hola, estoy metiendome en el mundo del punto net, y la verdad es que estoy complicado antes en vb6 hacia esto con el MSHfelxgrid y resultaba. Sub SetearCli() With FlexCli .ColWidth(0) = 200 .ColWidth(1) = 1500 .ColWidth(2) = 2900 .ColWidth(3) = ...

Mensaje publicado en el 18/10/2006 - 17:57

DBCC CHECKDB with PHYSICAL_ONLY

Que tal grupo. Hice un chequeo de la base de datos y me arroja este mensaje! No entiendo mucho de lo que significa,, un help para solucionarlo. El problema es que varias consultas estan sacando error! SQLSERVER 2000 SP4 DBCC CHECKDB with ...

Mensaje publicado en el 12/10/2006 - 23:53

Salto de celdas (con codigo en hoja)

Tengo el código necesario para realizar un salto de celdas en una hoja. Pero mi pregunta es la siguiente: ¿En que procedimiento debo meter este código para que funcione correctamente? Mi intención es meterlo de alguna ...

Mensaje publicado en el 28/09/2006 - 14:42

base de datos de VB 2005 express

Estoy empezando a programar en Visual Basic 2005 edition express y quisiera tener una ayudita para tener un buen comienzo. Tengo el siguiente programa para manejar una base de datos, pero al realizar una modificacion, alta o baja de algun dato no lo ...

Mensaje publicado en el 08/09/2006 - 04:40

Sobre Código

He puesto el siguiente código a un botón: Sub ColorEmpty() LastRow = Range("A65536").End(xlUp).Row For i = 1 To LastRow If IsEmpty(Cells(i, 1)) Then Cells(i, 1).Resize(1, 10).Interior.ColorIndex = 5 End If Next i End Sub y ...

Mensaje publicado en el 01/09/2006 - 00:32

Trabajar con DataGridView.

Hola a Todos!!!! Lo primero que necesito hacer con una es obtener la fila y la columna actual en la que esta posicionado el cursor en una DataGridView, algo asi como grdGrilla.Row y grdGrilla.Col de VB6, pero desde cualquier parte del código ...

Mensaje publicado en el 31/08/2006 - 22:45

Criterio alfanumerico para filtro

Hola a todos de nuevo. Tengo un formulario con dos combobox y un listbox que funcionan de la siguiente manera: 1.- en el 1er combo (cmbElegir) se cargan, al abrirse el formulario, los titulos de campo (26 en total) de una hoja de excel. 2.-en el ...

Mensaje publicado en el 28/08/2006 - 18:36

Criterio alfanumerico para filtro

Hola a todos de nuevo. Tengo un formulario con dos combobox y un listbox que funcionan de la siguiente manera: 1.- en el 1er combo (cmbElegir) se cargan, al abrirse el formulario, los titulos de campo (26 en total) de una hoja de excel. 2.-en el ...

Mensaje publicado en el 28/08/2006 - 18:36

eliminar filas vacias

tengo algunos problemillas con un codigo que estoy utilizando para eliminar filas vacias, de un total de 25155 que tengo en la hoja de calculo: Sub depurar() '[a1].Select For i = 1 To 28155 If Cells(i, 1).Text = "" Then Cells(i, ...

Mensaje publicado en el 26/08/2006 - 00:53

Insertar fila vacia

Tengo una lista de datos de aproximadamente 6500 filas y deseo escribir una macro para insertar una fila entre cada uno de los datos. He probado con el siguiente codigo pero la variable tipo string no almacena todo el rango que necesito, es decir ...

Mensaje publicado en el 19/08/2006 - 23:56

Añadir un parametro.

Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...

Mensaje publicado en el 18/08/2006 - 19:51

Añadir un parametro.

Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...

Mensaje publicado en el 18/08/2006 - 19:51

Añadir un parametro.

Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...

Mensaje publicado en el 18/08/2006 - 19:51

Añadir un parametro.

Teniendo el siguiente macro: Sub inserta() Dim celda As Range For Each celda In Range("B:B") If celda.Value = "" Then Exit Sub If celda.Value > celda.Row Then celda.EntireRow.Insert Next celda End Sub Necesito sacar el ...

Mensaje publicado en el 18/08/2006 - 19:51