Due problemini con VB e Excel

martedì 20 giugno 2006 - 11.38

pipillo Profilo | Newbie

Con vb6 apro, scrivo, modifico un foglio excel.

1) Ma se volessi sapere su quale riga si tova la prima occorrenza di un dato come faccio?

mi spiego meglio, cerco la parola "pantaloni" in un foglio excel:

risultato non trovo nulla ok
ma se trovo in una cella la parola cercata, come faccio a farmi restituire il numero dell riga?


2) come faccio a sapere qual'è l'ultima riga del foglio excel che contiene che contiene dati?




---------------------------------------------------------------------------------------
non ho avuto risposte ma qui si può trovare davvero tutto e di più
http://remigueudelot.free.fr/PHP/tuttigliesempivba.php

Ciciu Profilo | Senior Member

Ciao.
Per quanto riguarda il punto 1) , dovresti firerirTi all'oggetto SELECTION che, se non erro, tra le sue proprietà dovrebbe avere anche ROW e COLUMN....
Nel momento in cui sei posizionato su una cella, l'oggetto SELECTION la rappresenta. Se hai selezionato un gruppo di celle, ROW e COLUMN identificano la cella in alto a sinistra.
Per il punto 2), immagino che Tu debba fare un ciclo, per andare a testare i valori non nulli delle celle di una o più colonne...

Ciao - Fabio
Fabio G

pipillo Profilo | Newbie

grazie comunque per aver risposto,


la soluzione che ho adottato per cercare l'ultima riga utile è stat del tipo

Dim objExcel As Excel.Application
Dim objBook As Excel.Workbook
Dim objSheet As Excel.Worksheet

Set objExcel = New Excel.Application
|
|
|comandi di apertura del file
|
|

' trova l'ultima riga

Dim ultima As Double
objExcel.Sheets(10).Select :' Seleziono il foglio in cui cercare
objExcel.Range("D1").Select :' Selezionola colonna su cui cercare nel mio caso
ultima = objExcel.Cells(Cells.Rows.Count, "D").End(xlUp).Row :' Ottengo l'ultima riga della colonna D su cui vi sono dati validi

comunque la soluzione l'ho elaborata partendo dalla documentazione davvero straordinaria del sito che ho inserito nel mio primo post

Ciao
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !
Copyright © dotNetHell.it 2002-2024
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5