Kaip naudoti „GetOpenFilename“ metodą „Excel 2016 VBA“.

Jei jūsų VBA procedūra turi paprašyti naudotojo už failo, kurį galima naudoti InputBox funkciją ir leiskite Excel vartotojas ką nors rašyti. Tačiau įvesties laukelis paprastai nėra geriausias įrankis šiam darbui, nes daugumai vartotojų sunku atsiminti kelius, pasviruosius brūkšnius, failų pavadinimus ir failų plėtinius. Kitaip tariant, per lengva suklysti įvedant failo pavadinimą.

Norėdami geriau išspręsti šią problemą, naudokite programos objekto metodą GetOpenFilename, kuris užtikrina, kad jūsų kodas pateks į tinkamą failo pavadinimą, įskaitant visą jo kelią. Taikant GetOpenFilename metodą rodomas pažįstamas Atidaryti dialogo langas (neveikiantis dialogo lango „Excel“ skambutis, kai pasirenkate Failas → Atidaryti → Naršyti).

GetOpenFilename metodas iš tikrųjų neatidaro nurodyto failo. Šis metodas tiesiog grąžina vartotojo pasirinktą failo pavadinimą kaip eilutę. Tada galite parašyti kodą ir daryti ką norite su failo pavadinimu.

Metodo GetOpenFilename sintaksė

Oficiali GetOpenFilename metodo sintaksė yra tokia:

object.GetOpenFilename ([fileFilter], [filterIndex],
  [pavadinimas], [buttonText], [multiSelect])

Metodas „GetOpenFilename“ paima toliau pateiktus pasirenkamus argumentus.

Argumentas Ką tai daro
Failų filtras Nustato dialogo lange rodomų failų tipus
(pvz., *.TXT). Galite nurodyti kelis filtrus, iš kurių vartotojas
gali pasirinkti.
Filtravimo indeksas Nustato, kuris failas filtruoja dialogo langą pagal
numatytuosius nustatymus.
Pavadinimas Nurodo dialogo lango pavadinimo
juostos antraštę .
Mygtuko tekstas Ignoruojama (naudojama tik „Excel“ Macintosh versijai).
MultiSelect Jei tiesa, vartotojas gali pasirinkti kelis failus.

GetOpenFilename pavyzdys

Argumentas fileFilter nustato, kas bus rodoma dialogo lango išskleidžiamajame sąraše Files of Type. Šį argumentą sudaro failų filtrų eilučių poros, po kurių eina pakaitos simbolio failo filtro specifikacija, kableliais atskiriant kiekvieną dalį ir porą. Jei praleista, šis argumentas pagal numatytuosius nustatymus yra toks:

Visi failai (*.*), *.*

Atkreipkite dėmesį, kad ši eilutė susideda iš dviejų dalių, atskirtų kableliu:

Visi failai (*.*)

ir

*.*

Pirmoji šios eilutės dalis yra tekstas, rodomas išskleidžiamajame sąraše Files of Type. Antroji dalis nustato, kurie failai rodomi dialogo lange. Pavyzdžiui, *.* reiškia visus failus.

Šiame pavyzdyje pateiktas kodas atidaro dialogo langą, kuriame vartotojo prašoma įvesti failo pavadinimą. Procedūra apibrėžia penkis failų filtrus. Atkreipkite dėmesį, kad VBA eilutės tęsimo seka naudojama filtro kintamajam nustatyti; tai padeda supaprastinti šį gana sudėtingą argumentą.

Sub GetImportFileName ()
  Dim Finfo As String
  Dim FilterIndex As Long
  Pritemdykite pavadinimą kaip eilutę
  Pritemdykite failo pavadinimą kaip variantą
' Nustatykite failų filtrų sąrašą
  Finfo = "Teksto failai (*.txt),*.txt" & _
      „Lotus Files (*.prn),*.prn“ ir _
      „Kableliais atskirti failai (*.csv),*.csv“ ir _
      „ASCII failai (*.asc),*.asc“ ir _
      "Visi failai (*.*),*.*"
Pagal numatytuosius nustatymus rodyti *.*
  FilterIndex = 5
' Nustatykite dialogo lango antraštę
  Title = „Pasirinkite importuotiną failą“
' Gaukite failo pavadinimą
  FileName = Application.GetOpenFilename (FIinfo, _
    FilterIndex, Title)
Tvarkyti grąžinimo informaciją iš dialogo lango
  Jei failo pavadinimas = false, tada
    MsgBox „Nepasirinktas joks failas“.
  Kitas
    MsgBox „Jūs pasirinkote“ & Failo pavadinimas
  Pabaiga, jei
Pabaigos sub

Čia yra dialogo langas, rodomas „Excel“, kai vykdote šią procedūrą. Išvaizda gali skirtis, atsižvelgiant į naudojamą „Windows“ versiją ir nustatytas rodymo parinktis.

Kaip naudoti „GetOpenFilename“ metodą „Excel 2016 VBA“.

Naudojant GetOpen failo pavadinimo metodą rodomas tinkinamas dialogo langas ir pateikiamas pasirinkto failo kelias bei pavadinimas. Tai neatidaro failo.

Tikroje programoje su failo pavadinimu padarytumėte ką nors prasmingesnio. Pavyzdžiui, galbūt norėsite jį atidaryti naudodami tokį teiginį:

Workbooks.Open FileName

Atkreipkite dėmesį, kad kintamasis FileName deklaruojamas kaip Variant duomenų tipas. Jei vartotojas spustelėja Atšaukti, tame kintamajame yra Būlio reikšmė (False). Kitu atveju failo pavadinimas yra eilutė. Todėl naudojant Variant duomenų tipą, išsprendžiamos abi galimybės.

Leave a Comment

Specialiųjų simbolių įterpimas į Word 2010

Specialiųjų simbolių įterpimas į Word 2010

Kartais gali prireikti įterpti neįprastą simbolį į Word 2010 dokumentą. Perskaitykite, kaip lengvai tai padaryti su mūsų patarimais ir simbolių sąrašu.

Kaip naudoti logines funkcijas „Excel 2010“ formulėse

Kaip naudoti logines funkcijas „Excel 2010“ formulėse

„Excel 2010“ naudoja septynias logines funkcijas – IR, FALSE, IF, IFERROR, NOT, OR ir TRUE. Sužinokite, kaip naudoti šias funkcijas efektyviai.

Kaip paslėpti ir rodyti eilutes ir stulpelius programoje „Excel 2016“.

Kaip paslėpti ir rodyti eilutes ir stulpelius programoje „Excel 2016“.

Sužinokite, kaip paslėpti ir atskleisti stulpelius bei eilutes programoje „Excel 2016“. Šis patarimas padės sutaupyti laiko ir organizuoti savo darbalapius.

Kaip apskaičiuoti slenkančius vidurkius programoje „Excel“.

Kaip apskaičiuoti slenkančius vidurkius programoje „Excel“.

Išsamus vadovas, kaip apskaičiuoti slankiuosius vidurkius „Excel“ programoje, skirtas duomenų analizei ir orų prognozėms.

Kaip nukopijuoti formules naudojant automatinį pildymą programoje „Excel 2016“.

Kaip nukopijuoti formules naudojant automatinį pildymą programoje „Excel 2016“.

Sužinokite, kaip efektyviai nukopijuoti formules Excel 2016 programoje naudojant automatinio pildymo funkciją, kad pagreitintumėte darbo eigą.

Kaip „Excel 2010“ langeliams taikyti užpildymo spalvas, raštus ir gradientus

Kaip „Excel 2010“ langeliams taikyti užpildymo spalvas, raštus ir gradientus

Galite pabrėžti pasirinktus langelius „Excel 2010“ darbalapyje pakeisdami užpildymo spalvą arba pritaikydami ląstelėms šabloną ar gradiento efektą.

Kaip paryškinti savaitgalio datas programoje „Excel“.

Kaip paryškinti savaitgalio datas programoje „Excel“.

Dirbdami su laiko kortelėmis ir planuodami programą „Excel“, dažnai pravartu lengvai nustatyti bet kokias datas, kurios patenka į savaitgalius. Šiame straipsnyje pateikiami žingsniai, kaip naudoti sąlyginį formatavimą.

Kaip sukurti diagramas „Office 365“.

Kaip sukurti diagramas „Office 365“.

Sužinokite, kaip sukurti diagramas „Word“, „Excel“ ir „PowerPoint“ programose „Office 365“. Daugiau informacijos rasite LuckyTemplates.com.

Kaip sukurti pasirinktinius „Excel“ suvestinės lentelės skaičiavimus

Kaip sukurti pasirinktinius „Excel“ suvestinės lentelės skaičiavimus

„Excel“ suvestinės lentelės leidžia kurti <strong>pasirinktinius skaičiavimus</strong>, įtraukiant daug pusiau standartinių skaičiavimų. Šiame straipsnyje pateiksiu detalius nurodymus, kaip efektyviai naudoti šią funkciją.

Kaip pakeisti rašybos tikrinimo ir gramatikos nustatymus programoje „Word 2016“.

Kaip pakeisti rašybos tikrinimo ir gramatikos nustatymus programoje „Word 2016“.

Nesvarbu, ar dievinate, ar nekenčiate Word gebėjimo išjuokti jūsų kalbos gebėjimus, jūs turite galutinį sprendimą. Yra daug nustatymų ir parinkčių, leidžiančių valdyti „Word“ rašybos ir gramatikos tikrinimo įrankius.