Questione : Excel VBA per aprire altro eccelle la lima e copia il valore delle cellule a active eccelle lo strato

Il codice qui sotto dovrebbe aprire il percorso della lima che è immagazzinato mentre la stringa/valore nella gamma ha chiamato “FilePath„ ed ottiene la cellula A1 della forma di valore nello strato aperto, la copia per variare “CopiedValue„ nello strato con il codice e chiude il libro aperto senza saving.

Unfortunately, la mia versione non funziona… alcun aiuto appreciated. class= > " libero " del
> " del codeSnippet " del class= del
class= " lineNumbers " del
class= del 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
>Sub notpretty GetHistData " del class= " del id= " codeSnippet961699 del
class= " lastRow del
>Attachments " di nome " del class= del class= " valore " del
il

class= " fileInfo " del
il title= " " di nome di schedario del class= " di ee.xls il class= (17 KB)  Javascript " del href= " " dei attachmentDetails del class= di (tipo di lima particolari)  
class= " descrizione " del
lima con il codice discussed
il class= di
del >
class= del

Risposta : Excel VBA per aprire altro eccelle la lima e copia il valore delle cellule a active eccelle lo strato

GetHistData secondario ()
    'lima aperta di hist
    Mwb fioco come libro di esercizi
    FilePath = gamma (“FilePath„). Valore
    Regolare il mwb = Workbooks.Open (nome di schedario: =FilePath)
    mwb. Strati (“Sheet1„). Gamma (“A1„). Copia
    ThisWorkbook.Sheets (“Sheet1„). Colla della gamma (“CopiedValue„) .PasteSpecial: =xlPasteValues, funzionamento: =xlNone, _ di SkipBlanks
        : Il =False, traspone: =False
    Libri di esercizi (mwb. Nome). Falso vicino
Sommergibile dell'estremità
Altre soluzioni  
 
programming4us programming4us