Re: excel és word

[Takacs Zoltan]

Ez a makro azt csinálja, hogy minden második bekezdést átrak egy új 
dokumentumban:
(ahhoz, hogy jól működjön:
- csinálsz egy másolatot az eredetiből....biztos, ami biztos.
- elnditod a wordot megnyitott benne a másolatot /más dokumentum ne legyen 
nyitva!!
- nyitsz egy uj lapot - oda fogja tenni a páros bekezdéseket...
- vissza a másolatra - eszkozok, makrok, létrehozás és oda bemásolod a 
sub-ok közti részt...
majd lefuttado és már kész is...
- A K értékét a fornál állítsd be a bekezdések számának a felére vagy valai 
jó nagy számra...

Sub masodikmasolas()
For K = 1 To 10
    Selection.Paragraphs(1).Range.Select
    Selection.Delete Unit:=wdCharacter, Count:=1
    Selection.Paragraphs(1).Range.Select
    Selection.Cut
    Windows(2).Activate
    Selection.PasteAndFormat (wdPasteDefault)
    Windows(1).Activate
Next K
End Sub


----- Original Message ----- 
From: "Feca" <feca at azm.uz.ua>
To: "Techinfo" <techinfo at lista.sulinet.hu>
Sent: Friday, February 08, 2008 7:35 AM
Subject: Re: excel és word


Köszönöm szépen.
Excelben sikerült ezt is szűréssel megoldani, mert volt két állandó karakter 
a törlendő sorokban.


  ----- Original Message ----- 
  From: Szalayne' Tahy Zsuzsa
  To: 'Techinfo'
  Sent: Thursday, February 07, 2008 5:06 PM
  Subject: RE: excel és word


  Wordben:

  1.       üres bekezdések törlése: szerkesztés/csere speciális - két entert 
1 enterre

  2.       a szöveg táblázattá alakítása - cellahatároló a bekezdés jel, 2 
oszlopos táblázat

  3.       a második (vagy egyik) oszlop törlése

  4.       táblázat visszaalakítása szöveggé



    Szalayné Tahy Zsuzsa

    sztzs at infoktedra.hu

  Szent István Gimnázium



  From: techinfo-bounces at lista.sulinet.hu 
[mailto:techinfo-bounces at lista.sulinet.hu] On Behalf Of Feca
  Sent: Thursday, February 07, 2008 11:10 AM
  To: Techinfo
  Subject: excel és word



  Sziasztok!



  Két kérdésem van.

  1. Az excelben hogyan lehet törölni az üres (minden cella a sorban) 
sorokat?

  2. A Wordben hogyan lehet törölni minden második (nem üres) bekezdést?



  Gondolom, hogy makrókkal, de sajna nem ismerem a VisualBasic-et.





  feca



------------------------------------------------------------------------------


  _______________________________________________
  Techinfo mailing list
  Techinfo at lista.sulinet.hu
  http://lista.sulinet.hu/mailman/listinfo/techinfo
  Illemtan: http://www.1let.hu/illemtan.html
  Ügyfélszolgálat FAQ: http://www.kozhalo2.hu/Faq.aspx



--------------------------------------------------------------------------------


_______________________________________________
Techinfo mailing list
Techinfo at lista.sulinet.hu
http://lista.sulinet.hu/mailman/listinfo/techinfo
Illemtan: http://www.1let.hu/illemtan.html
Ügyfélszolgálat FAQ: http://www.kozhalo2.hu/Faq.aspx