Newsgroup: it.comp.appl.access
Titolo: DoCmd.TransferSpreadsheet acLink e riquadro di spostamento

Come in oggetto. È possibile collegare un file excel senza far aprire il riquadro? Nulla di grave, ma è una scocciatura. Grazie

 Come in oggetto. È possibile collegare un file excel senza far aprire il riquadro? Nulla di grave, ma è una scocciatura. Grazie
 
Hai provato a guardare questo esempio...?
 
https://vbamacros.net/macros/access-link-to-an-excel-spreadsheet-with-dao
 
 
@Alex

 riquadro? Nulla di grave, ma è una scocciatura. Grazie
 
Yes, of course!
 
=================================
Private Sub LinkExcelTable_Click()
Dim xlTable As String, xlFilePath As String
Dim xlRange As String, AccessTable As String
 
AccessTable = "xlLinkedTab"
xlFilePath = "D:\Document\Excel\XLS\Statistica.xls"
xlRange = "Trasposizione!O36:P53"
 
DoCmd.TransferSpreadsheet acLink, _
    SpreadsheetType:=acSpreadsheetTypeExcel9, _
    TableName:=AccessTable, _
    FileName:=xlFilePath, _
    HasFieldNames:=False, _
    Range:=xlRange
 
End Sub
==================================
 
Bruno


Ciao Bruno, con il docmd.TransferSpreadsheet si apre il riquadro
 
Ciao Alex, in effetti da codice non ho provato utilizzando tabledef. Proverò
 
Grazie ad entrambi

 Ciao Bruno, con il docmd.TransferSpreadsheet si apre il riquadro
A casa mia premendo un button non si apre proprio niente!
Diversamente non te l'avrei inviato.
 
A casa mia: Windows 10 Pro, Office 2019 Professional Plus,
            tutto ENG a 64/bit.
 
Bruno

 Come in oggetto. È possibile collegare un file excel senza far aprire il riquadro? Nulla di grave, ma è una scocciatura. 
 
È un problema già da quando esiste il pannello di navigazione. Quando un 
collegamento viene impostato, sia da codice che a mano, il nuovo oggetto 
viene evidenziato nel riquadro. Selezionandolo provoca che si apre il 
riquadro.
 
L'unica soluzione è chiudere il riquadro da codice immediatamente dopo 
l'azione. Vedi 
https://www.donkarl.com/it?FAQ6.2
.
 
-- 
Ciao
Karl
*********
http://AccessDevCon.com
 
Access FAQ: 
https://www.donkarl.com/it
 

 
 
A proposito, ho visto questa domanda x volte nel corso degli anni in 
tutti i tipi di forum Access e ho risposto molte volte, ma solo ora ho 
pensato di segnalare il problema al team Access della Microsoft. Almeno 
ora è sulla loro lista dei bug, che potrebbe essere risolta alla fine.


Karl Donaubauer used his keyboard to write :

Scusa Karl ma si che bug stai parlando?
==========================
Private Sub Command27_Click()
 
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12Xml, 
"tbExcel", "D:\Document\Excel\XLS\Agenti.xlsm", True, "C2:E15"
 
End Sub
===========================
 
L'unico problema di questa riga di codice è l'esistenza di tbExcel
nell'elenco Table... presto risolvibile.
 
A parte ciò nessun "riquadro" appare e la la tabella appare, senza
che se ne veda il movimento, fra le tables di Access.
 
O mi sfugge qualcosa?
 
Bruno

 ...
 
Come scritto il problema occore quando un _collegamento_ viene 
impostato, cioè con acLink.
 
Se hai precedentemente selezionato l'opzione per nascondere il riquadro 
di spostamento, allora apparirà non appena eseguirai un'operazione di 
collegamento con TransferText o Transferspreadsheet.


Karl Donaubauer formulated on Wednesday :

Debbo aver dormito male stanotte... ti ho inviato la procedura 
acImport.
 
Volevo inviarti questa:
==============================
Private Sub LinkExcelTable_Click()
'
' Access 2010/64    BC.accdb    31-12-2012
' Form: TableOperations    Link Excel Table
'
' Da Access definire un link con un range di Excel
'
Dim xlTable As String, xlFilePath As String, xlRange As String, 
AccessTable As String
 
AccessTable = "xlLinkedTab"
xlFilePath = "D:\Document\Excel\XLS\Statistica.xls"
xlRange = "Trasposizione!O36:P53"
 
DoCmd.TransferSpreadsheet acLink, _
    SpreadsheetType:=acSpreadsheetTypeExcel9, _
    TableName:=AccessTable, _
    FileName:=xlFilePath, _
    HasFieldNames:=False, _
    Range:=xlRange
 
End Sub
========================================
 
Per la quale ti riconfermo che non si vede proprio nulla durante
l'esecuzione.
 
Mi puoi inviare una procedura di "TransferSpreadsheet acLink..."
da Access, la quale mostri quel che non si vorrebbe?
Sono incredulo e curioso.
 
Grazie
Bruno

>> ...

Con questo codice il riquadro si apre qui (Access 2010/32) - come aspettato.


Karl Donaubauer has brought this to us :

Da me (Windows 10 Pro, Access Professional Plus 2019,
tutto ENG e 64/bit) non si apre proprio niente.
 
Come fa un esperto come te non essere aggiornato?
 
Bruno

 Come fa un esperto come te non essere aggiornato?
 
 
Se qualcuno specifica la versione che sta usando,
 > ' Accesso 2010/64
cercherò di trovarne uno almeno simile per un test.
 
Per i colleghi lettori:
 
Non confondetevi.
Il problema si verifica in tutte le versioni di Access che hanno un 
riquadro di spostamento, cioè dal 2007 alla variante oggi attuale di 
Access 365. Ho spiegato il motivo nella mia prima risposta:
 
 > Quando un collegamento viene impostato, sia da codice che a mano,
 > il nuovo oggetto viene evidenziato nel riquadro.
 > Selezionandolo provoca che si apre il riquadro.
 
Quindi non è proprio un bug ma il comportamento predefinito quando si 
collega tabelle esterne. Ecco perché Microsoft non l'ha mai avuto nella 
lista dei bug da curare.
Ne ho discusso con un tecnico del team Access e naturalmente si rende 
conto che è problematico se qualcuno nasconde intenzionalmente il 
riquadro. Pertanto, ora è sulla loro lista dei problemi. Però se verrà 
aggiustato, sarà probabilmente solo per le attuali varianti di Access.
 
Altrimenti aiuta il workaround che ho menzionato prima di nasconderlo di 
nuovo immediatamente. (
https://www.donkarl.com/it?FAQ6.2
.)



Grazie a tutti