Moderatori: Anthony47, Flash30005
Columns("AK:AN").ClearContents
MyConn = "URL;" _
& Range("CI33")
With ActiveSheet.QueryTables.Add(Connection:=MyConn, _
Destination:=Range("AK1"))
.Name = "willy"
.FieldNames = False
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = False
.RefreshOnFileOpen = False
.BackgroundQuery = False
.RefreshStyle = xlOverwriteCells
.SavePassword = False
.SaveData = False
.AdjustColumnWidth = False
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
'.WebTables = "1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20"
.WebSelectionType = xlEntirePage
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = True
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With
'Columns(9).NumberFormat = "@"
Call Rimuovi_connessioni
Errore di run-time '-2147417848 (80010108)':
Errore di automazione
L'oggetto invocato si è disconnesso dai client corrispondenti.
Range("AK:AN").ClearContents
Sub Rimuovi_connessioni()
On Error Resume Next
Const s As String = "willy"
Dim nm As Name
For Each nm In ActiveWorkbook.Names
If nm.Name Like "*" & s & "*" Then nm.Delete
Next
Set nm = Nothing
Dim e As Integer
For e = ActiveWorkbook.Connections.Count To 1 Step -1
ActiveWorkbook.Connections(e).Delete
Next
End Sub
aggittoriu ha scritto:Poi scopro che i problemi ce li ha il pc e non excel. E quindi vi ho fatto perdere tempo, perchè non potete aiutarmi.
m.paolo ha scritto:Apri un nuovo topic e specifica i problemi che ha il pc. Metti più informazioni possibili.
La cartella di lavoro contiene uno o più collegamenti che non possono essere aggiornati
Per modificare l'origine dei collegamenti o tentare nuovamente di aggiornare i valori, scegliere Modifica collegamenti.
Per mantenere invariati i collegamenti, scegliere Continua
Tipo--> Foglio di lavoro Aggiorna--> A Stato--> Errore: origine non trovata.
Oltre a "Modifica collegamenti" dovresti avere anche l'opzione "Interrompi collegamento", che congela i dati ai valori che vedi.Di questo, come me ne libero?
Torna a Applicazioni Office Windows
Errore durante la riduzione a icona delle finestre durante l Autore: johnhartman |
Forum: Software Windows Risposte: 1 |
Errore 1004 su macro salva file come mht - mhtml Autore: systemcrack |
Forum: Applicazioni Office Windows Risposte: 4 |
Accesso sito negato - errore ERR_CONNECTION_REFUSED Autore: dipdip |
Forum: Software Windows Risposte: 10 |
Visitano il forum: raimea e 26 ospiti