Results 1 to 2 of 2

Hybrid View

Previous Post Previous Post   Next Post Next Post
  1. #1
    Registered User
    Join Date: May:2013
    Location: Áîòåâãðàä
    Posts: 1

    Ìàëêî ïîìîù çà VBA

    Çäðàâåéòå,

    Áèõ èñêàë äà ïîìîëÿ çà ïîìîù çà ñëåäíîòî íåùî. Èìàìå åêñåëñêè ôàéë, â êîéòî èìà äâà øèèòà - "MAIN" è "DATA". Òîâà êîåòî áèõ èñêàë äà ñå ñëó÷è å ñëåäíîòî. Ñ íàòèñêàíåòî íà áóòîí "Refresh", ïðîãðàìàòà äà îòèäå â øèèò "DATA", äà ïðîâåðè è äàííèòå îò êîëîíà "A" ñ äàííèòå îò êîëîíà "A" â øèèò "MAIN" è äà êîïèðà ãè êîïèðà îò "DATA" â "MAIN", íî ñàìî òåçè êîèòî íå ñà íàëè÷íè â "MAIN" ñúîòâåòíî íàé-îòäîëó.

    Áëàãîäàðÿ âè ïðåäâàðèòåëíî

  2. #2
    The point of no return ifch0's Avatar
    Join Date: Jun:2007
    Location: Ñîôèÿ
    Posts: 3,678
    Ñåùàì ñå çà:

    Â Sheet "Data", ïðàâèø êîëîíà B, â êîÿòî äà èìà ïðîâåðêà, äàëè ñòîéíîñòòà ÿ èìà â "Main" íàïð. ôîðìóëàòà â B2 ùå äà å "IF(ISNA(VLOOKUP(A2; Main!$A:$A; 1; FALSE)); "No"; "Yes")
    Âå÷å, àêî ãîâîðèì çà ìàëêî ðåäîâå è íå òå ïðèòåñíÿâà ðú÷íàòà ðàáîòà - ôèëòðèðàø ïî êîëîíà B, äà ñå âèæäàò "Yes"-îâåòå è êîïèðàø â äðóãàòà òàáëèöà.
    Àêî èñêàø äà å àâòîìàòè÷íî, ìîæåø äà çàïèøåø åäèí ìàêðîñ ñ Advanced Filter (+ Copy) ôóíêöèÿòà.
    Ñëåä òîâà ìààààëêî ùå òðÿáâà äà ãî ïèïíåø (çàùîòî àêî ïóñêàø òîçè ìàêðîñ, âèíàãè ùå Paste-âà íåùàòà íà åäíî è ñúùî ìÿñòî, à òè èñêàø äà ãè äîáàâÿø íàé-îòäîëó, ïðåäïîëàãàì).
    Â åäíà ïðîìåíëèâà äà ïðåáðîè êîëêî ðåäà â êîëîíà Main / A èìà äàííè, äà äîáàâè 1 è òàì äà Paste-íå ôèëòðèðàíèòå íåùà.
    Ïîñëå ñè ñëàãàø áóòîí÷åòî êúäåòî èñêàø è ìó ïðèêà÷àø ãîòîâèÿò Macros.
    Àêî ïðîäúëæàâàø äà ïðàâèø òîâà, êîåòî ïðàâèø, ùå ïðîäúëæèø äà ïîëó÷àâàø òîâà, êîåòî ïîëó÷àâàø.
    Ïðîñòè ïðàâèëà çà èäèîòè: ÍÿêîÉ (åäèíñòâåíî ÷èñëî) - íÿêîÈ (ìíîæåñòâåíî); ÊîÉ (åä.÷.) - êîÈ (ìí.÷.).
    ÁàòåðèÉ ñúùî å Ã-Ð-Å-Ø-Í-Î! Íàó÷åòå ñå äà ïèøåòå, ÷å ìè ïèñíÀ íà...

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Copyright © 1999-2011 Õàðäóåð ÁÃ. Âúçìîæíî å ñúäúðæàíèåòî íà òàçè ñòðàíèöà äà å îáåêò íà àâòîðñêè ïðàâà.
iskamPC.com | mobility.BG | Bloody's Techblog | Êðèïòîâàëóòè è ìàéíèíã | 3D Vision Blog | Ìàãàçèí çà åëåêòðîííè öèãàðè