欧美性猛交XXXX免费看蜜桃,成人网18免费韩国,亚洲国产成人精品区综合,欧美日韩一区二区三区高清不卡,亚洲综合一区二区精品久久

sub 導入()
    set cnn=createobject("adodb.connection")
    cnn.Open "provider=microsoft.jet.oledb.4.0;extended properties='excel 8.0;hdr=no;'data source=" & thisworkbook.path & "\另外這個(gè).xls"
    sql="select * from [一組$E1:P65536]"
    sheets("一組").[c1].copyfromrecordset cnn.execute(sql)
    cnn.close
    set cnn=nothing
end sub