Jump to content

SUBIECTE NOI
« 1 / 5 »
RSS
Cu ce va aparati de cainii agresi...

Nu imi platiti coletul cu cardul ...

Mi-au disparut amigdalitele ?

Exista vreun plan de terorizare p...
 Schimbare adresa DNS IPv4 pe rout...

Recomandare Barebone

Monede JO 2024

Suprasolicitare sistem electric
 CIV auto import

Mutare in MOZAMBIC - pareri, expe...

Scoatere antifurt airtag de pe ha...

Magnet in loc de clește pent...
 Cumparat/Locuit in apartament si ...

Pot folosi sistemul PC pe post de...

Sokol cu distorsiuni de cross-over

Filtru apa potabila cu osmoza inv...
 

Macro in Excel !

- - - - -
  • Please log in to reply
5 replies to this topic

#1
cosmin_l

cosmin_l

    New Member

  • Grup: Members
  • Posts: 18
  • Înscris: 22.01.2006
Imi poate spune cineva cum pot realiza un macro de adaugare la o coloana cu valori cuprinse 1-1000 a urmatoarelor procente:

0-50 - 15%
51-100- 10%
101-500 - 5%
peste 500 - 3%

Multumesc !

#2
cosmin_l

cosmin_l

    New Member

  • Grup: Members
  • Posts: 18
  • Înscris: 22.01.2006

View Postcosmin_l, on Jun 6 2006, 14:35, said:

Imi poate spune cineva cum pot realiza un macro de adaugare la o coloana cu valori cuprinse 1-1000 a urmatoarelor procente:

0-50 - 15%
51-100- 10%
101-500 - 5%
peste 500 - 3%

Multumesc !

Am gasit ceva asemanator, dar pt. colorarea anumitor valori.
Ex: Se da o coloana (ex: A1:A100) cu valori cuprinse intre 1 si 20. Se coloreaza valorile mai mari de 10 cu verde si cele mai mici de 10 cu albastru.

Sub macro1()
Dim i As Long

For i = 1 To 100 'aici se inlocuieste 100 cu ultima linie, valorile se iau de pa coloana A
If Cells(i, "A") > 10 Then
Cells(i, "A").Font.Color = vbGreen ' asta are loc daca > 10
Else
Cells(i, "A").Font.Color = vbBlue ' asta are loc daca < sau = 10
End If
Application.StatusBar = i ' asta ca sa vezi ce se intampla
Next

End Sub

Nu stiu cu ce sa inlocuiesc functiile Font.Color si vbGreen/vbBlue, pt. a rezulta adaugarea de procente anumitor valori, nu colorarea lor.
Please help me !!!

#3
Mr_Woppit

Mr_Woppit

    the last of them..

  • Grup: Super Moderators
  • Posts: 17,834
  • Înscris: 26.11.2001
de ce macro ? poti pune o formula, uita-te in imaginea atasata ... nu stiu daca asta vroiai dar poate fi adaptata lejer catre orice altceva

#4
cosmin_l

cosmin_l

    New Member

  • Grup: Members
  • Posts: 18
  • Înscris: 22.01.2006
As fi dorit macro pt. ca ar fi mai usor de utilizat (fiind vorba de cateva mii de linii).
In lipsa acestuia aplic aceasta optiune sugerata de tine.
Thanks a lot!

Edited by cosmin_l, 08 June 2006 - 10:24.


#5
Mr_Woppit

Mr_Woppit

    the last of them..

  • Grup: Super Moderators
  • Posts: 17,834
  • Înscris: 26.11.2001

View Postcosmin_l, on Jun 8 2006, 10:16, said:

As fi dorit macro pt. ca ar fi mai usor de utilizat (fiind vorba de cateva mii de linii).
In lipsa acestuia aplic aceasta optiune sugerata de tine.
Thanks a lot!

pai de ce e mai greu ? pui prima formula si apoi autocomplete-ul o face peste tot in cateva secunde ... apoi poti sa faci Copy/Paste Special/Values pe coloana si ramai strict cu valorile.

#6
cosmin_l

cosmin_l

    New Member

  • Grup: Members
  • Posts: 18
  • Înscris: 22.01.2006
Da, mersi mult, cu unele mici modificari, a mers fara probl.
Raman dator.
Thank's !

Anunturi

Second Opinion Second Opinion

Folosind serviciul second opinion ne puteți trimite RMN-uri, CT -uri, angiografii, fișiere .pdf, documente medicale.

Astfel vă vom putea da o opinie neurochirurgicală, fără ca aceasta să poată înlocui un consult de specialitate. Răspunsurile vor fi date prin e-mail în cel mai scurt timp posibil (de obicei în mai putin de 24 de ore, dar nu mai mult de 48 de ore). Second opinion – Neurohope este un serviciu gratuit.

www.neurohope.ro

0 user(s) are reading this topic

0 members, 0 guests, 0 anonymous users

Forumul Softpedia foloseste "cookies" pentru a imbunatati experienta utilizatorilor Accept
Pentru detalii si optiuni legate de cookies si datele personale, consultati Politica de utilizare cookies si Politica de confidentialitate