DoCmd.TransferSpreadsheet acLink e riquadro di spostamento

[Roberto Fabbri]

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

[@Alex]

Post by Roberto Fabbri
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

[Bruno Campanini]

Post by Roberto Fabbri
Come in oggetto. È possibile collegare un file excel senza far aprire il
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

[Roberto Fabbri]

Post by Bruno Campanini

Post by Roberto Fabbri
Come in oggetto. È possibile collegare un file excel senza far aprire il
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

[Bruno Campanini]

Post by Roberto Fabbri

Post by Bruno Campanini

Post by Roberto Fabbri
Come in oggetto. È possibile collegare un file excel senza far aprire il
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

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

[Karl Donaubauer]

Salve,

Post by Roberto Fabbri
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.

[Karl Donaubauer]

Post by Karl Donaubauer

Post by Roberto Fabbri
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.

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.

[Bruno Campanini]

Post by Karl Donaubauer

Post by Roberto Fabbri
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.

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.

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

[Karl Donaubauer]

Salve,

Post by Bruno Campanini

Post by Karl Donaubauer

Post by Karl Donaubauer

Post by Roberto Fabbri
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.

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.

Scusa Karl ma si che bug stai parlando?
...
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12Xml,
...

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.

[Bruno Campanini]

Post by Karl Donaubauer
Salve,

Post by Bruno Campanini

Post by Karl Donaubauer

Post by Roberto Fabbri
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.

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.

Scusa Karl ma si che bug stai parlando?
...
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel12Xml, ...

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.

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

[Karl Donaubauer]

Salve,

Post by Karl Donaubauer

...

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.

Debbo aver dormito male stanotte... ti ho inviato la procedura acImport.
==============================
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.

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

[Bruno Campanini]

Post by Karl Donaubauer
Salve,

Post by Karl Donaubauer

...

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.

Debbo aver dormito male stanotte... ti ho inviato la procedura acImport.
==============================
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.

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

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

[Karl Donaubauer]

Post by Bruno Campanini

Post by Karl Donaubauer

...

...
' Access 2010/64    BC.accdb    31-12-2012
...
DoCmd.TransferSpreadsheet acLink, _

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

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?

Se qualcuno specifica la versione che sta usando,

Post by Bruno Campanini
' 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

Post by Bruno Campanini
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.)

[Roberto Fabbri]

Post by Karl Donaubauer

Post by Bruno Campanini

Post by Karl Donaubauer

...

...
' Access 2010/64 BC.accdb 31-12-2012
...
DoCmd.TransferSpreadsheet acLink, _

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

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?

Se qualcuno specifica la versione che sta usando,

Post by Bruno Campanini
' Accesso 2010/64

cercherò di trovarne uno almeno simile per un test.
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

Post by Bruno Campanini
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.)
--
Ciao
Karl
*********
http://AccessDevCon.com
Access FAQ: https://www.donkarl.com/it

Grazie a tutti