Ako skopírovať Text do bloku textu na bunku

ID článku: 152379 - Zobraziť produkty, ktorých sa tento článok týka.
Strojovo preloženéKliknutím sem zobrazíte vyhlásenie týkajúce sa strojovo preložených článkov databázy KB
Rozbaliť všetko | Zbaliť všetko

Na tejto stránke

SUHRN

Tento článok obsahuje vzorka jazyka Microsoft Visual Basic pre aplikácie makro (Sub postup), ktoré skopíruje text do bloku textu a prilepí do tabuľky.

Po týchto krokov uvedených v tomto článku, mali by ste vidieť text zobrazia v rôznych buniek v stĺpci A, počnúc bunkou A1. Každý samostatné bunky bude obsahovať text z jedného bloku textu.

Poznámka: V programe Microsoft Excel 7.0 alebo staršej, ak blok textu obsahuje viac ako 255 znakov, číselné údaje sa zobrazia v exponenciálnom. Ak údaje v textovom poli je alfanumerický, bunka bude len držať prvý 255 znaky údajov. Microsoft Excel 97 a Microsoft Excel 98 môže pojať maximálne 32 000 znakov na bunku.
Späť na začiatok | Odošlite odozvu

DALSIE INFORMACIE

Spoločnosť Microsoft poskytuje príklady programovacieho kódu len ako názornú ukážku bez ľubovoľnej vyjadrenej alebo implicitnej záruky. Toto zahŕňa, okrem iného, implicitné záruky obchodovateľnosti a vhodnosti pre konkrétny účel. Úroveň odbornosti článku predpokladá, že ovládate predvádzaný programovací jazyk a nástroje, ktoré sa používajú na vytváranie a ladenie procedúr. Pracovníci technickej podpory spoločnosti Microsoft môžu pomôcť vysvetliť funkčnosť konkrétny postup, ale nie modifikuje tieto príklady poskytovať pridanú funkčnosť alebo výstavbe postupy splniť vaše konkrétne požiadavky. Ak chcete vytvoriť blok textu v programe Microsoft Excel, postupujte nasledovne:
  1. Do nového pracovného hárka, v ponuke Zobraziť ukážte na položku Panely s nástrojmi a potom kliknite na tlačidlo Kreslenie. Kliknite na tlačidlo OK.
  2. Na paneli s nástrojmi Kreslenie kliknite na tlačidlo blok textu.
  3. Umiestnite kurzor na miesto na pracovný hárok, kde chcete text pole Zobraziť a podržte stlačené ľavé tlačidlo myši presuňte ukazovateľ právo nakreslite blok textu.
  4. Kliknite do bloku textu a zadajte nejaký text.
  5. Opakujte kroky 1-4 niekoľkokrát na vytvorenie viacerých textových poliach.

Postup vzorky Visual Basic

Pred prácou s vzorového kódu, vykonajte nasledovné kroky:
  1. Otvorte nový zošit.
  2. V programe Microsoft Excel 97 alebo Microsoft Excel 98, ukážte na položku makro na V ponuke Nástroje a potom kliknite na položku Editor jazyka Visual Basic. V editore jazyka Visual Basic kliknite na modul v ponuke Vložiť.

    -alebo-

    V programe Microsoft Excel 5.0 a 7.0, ukážte na položku makro v ponuke Vložiť a potom kliknite na položku modul.
  3. Do hárku modulu zadajte kód makra vzorky:
          Sub Main()
          Sheets("Sheet1").Select
          ' Assign the counter an initial row value.
          x = 1
          ' Loop through each text box in the activesheet.
          For Each tbox in ActiveSheet.TextBoxes
              ' Select the next row down and place the text there.
              Range("a" & x).Value = tbox.Text
              ' Increment the counter
              x = x + 1
          Next tbox
    End Sub
Späť na začiatok | Odošlite odozvu

Vlastnosti

ID článku: 152379 - Posledná kontrola: 17. októbra 2011 - Revízia: 2.0
Informácie v tomto článku sa týkajú nasledujúcich produktov:
  • Microsoft Excel 97 Standard Edition
  • Microsoft Excel 95 Standard Edition
  • Microsoft Excel 5.0 Standard Edition
  • Microsoft Excel 98 for Macintosh
Kľúčové slová: 
kbdtacode kbhowto kbprogramming kbmt KB152379 KbMtsk
Strojovo preložené
DÔLEŽITÉ: Tento článok bol preložený pomocou softvéru na strojový preklad od spoločnosti Microsoft, nie prekladateľom. Spoločnosť Microsoft ponúka články preložené prekladateľmi aj strojovo preložené články, vďaka čomu máte možnosť prístupu ku všetkým článkom databázy Knowledge Base vo svojom jazyku. Strojovo preložený článok však nie je vždy perfektný. Môže obsahovať chyby týkajúce sa slovnej zásoby, syntaxe alebo gramatiky, podobne ako cudzinec môže robiť chyby, keď rozpráva vašim jazykom. Spoločnosť Microsoft nenesie zodpovednosť za akékoľvek nepresnosti, chyby alebo škody spôsobené akýmkoľvek nepresným prekladom obsahu alebo jeho použitím zo strany zákazníkov. Spoločnosť Microsoft softvér na strojový preklad pravidelne aktualizuje.
Pokiaľ chcete vidieť anglickú verziu článku, kliknite sem:152379
(http://support.microsoft.com/kb/152379/en-us/ )
Upozornenie na neaktuálny obsah článku databázy KB
Tento článok obsahuje informácie o produktoch, pre ktoré spoločnosť Microsoft už neposkytuje technickú podporu. Z tohto dôvodu je tento článok publikovaný ako nezmenený a už nebude aktualizovaný.
Späť na začiatok | Odošlite odozvu

Odošlite odozvu

 
Späť na začiatokSpäť na začiatok