Sì, ci sto prendendo gusto.
Mettiamo il caso che io abbia copiato su excel un testo piuttosto lungo, all'interno del quale voglio isolare una parola chiave ben precisa cancellando tutto il resto.
Come potrei operare?
Grazieee
Moderatori: Anthony47, Flash30005
MyLink="http://baubaumiciomicio/Servizi/sociali ... Richiesta=" & Range("A1").value & "&servizio=NSG"
ActiveWorkbook.FollowHyperlink Address:=MyLink , NewWindow:=True
UR = Worksheets("Foglio1").Range("A" & Rows.Count).End(xlUp).Row
For I = 1 To UR
Sub Macro1()
'
' Macro1 Macro'
'
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://www.lottoconsult.it/estrazioni_lotto.asp?anno=2008", Destination _
:=Range("A1"))
.Name = "estrazioni_lotto.asp?anno=2008"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebTables = "7,8"
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With
End Sub
"URL;http://www.lottoconsult.it/estrazioni_lotto.asp?anno=2008", Destination _
:=Range("A1"))
For Anno = 2000 to 2010
"URL;http://www.lottoconsult.it/estrazioni_lotto.asp?anno=" & Anno, Destination _
:=Range("A1"))
'...
'...
Next Anno
calculon ha scritto:'sto visual basic è una roba assurda!
Torna a Applicazioni Office Windows
scrivere una parola in ComboBox e caricarla filtrando i dati Autore: ricky53 |
Forum: Applicazioni Office Windows Risposte: 3 |
colora parte di frase/ Parola in stessa cella Autore: raimea |
Forum: Applicazioni Office Windows Risposte: 6 |
cancellare cronologia del lettore multimediale Autore: themisterx |
Forum: Software Windows Risposte: 1 |
Quali sono i passaggi chiave per scrivere una tesi di dottor Autore: Mixmisx |
Forum: Forum off-topic Risposte: 0 |
Visitano il forum: raimea e 17 ospiti