Cuestión : Excel VBA para abrir otro sobresale el archivo y copia valor de la célula al active sobresale la hoja

El código abajo debe abrir la trayectoria del archivo se almacena que como la secuencia/el valor en gama nombró “FilePath” y consigue la célula A1 de la forma del valor en la hoja abierta, la copia para extenderse “CopiedValue” en la hoja con el código y cierra el libro abierto sin saving.

Unfortunately, mi versión no trabaja… ninguna ayuda appreciated. class= > " claro " 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 del " nombre " del class= del class= " valor " del
del >
class= " fileInfo " del
el title= " del " nombre de fichero del class= " del ee.xls el class= (17 KB)  Javascript del href= " de los " attachmentDetails del class= " del (tipo de archivo detalles)  
class= " descripción " del
archivo con el código discussed
el class= de
del >
class= del

Respuesta : Excel VBA para abrir otro sobresale el archivo y copia valor de la célula al active sobresale la hoja

GetHistData secundario ()
    'archivo abierto del hist
    Mwb dévil como libro de trabajo
    FilePath = gama (“FilePath”). Valor
    Fijar el mwb = Workbooks.Open (nombre de fichero: =FilePath)
    mwb. Hojas (“Sheet1”). Gama (“A1”). Copia
    ThisWorkbook.Sheets (“Sheet1”). Goma de la gama (“CopiedValue”) .PasteSpecial: =xlPasteValues, operación: =xlNone, _ de SkipBlanks
        : El =False, transporta: =False
    Libros de trabajo (mwb. Nombre). Falso cercano
Submarino del extremo
Otras soluciones  
 
programming4us programming4us