Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Visual Basic u Excelu

[es] :: Visual Basic 6 :: Visual Basic u Excelu

[ Pregleda: 7787 | Odgovora: 18 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

brzi62s
Informaticki Fakultet
Beograd

Član broj: 296915
Poruke: 7
*.cpe.vektor.net.



Profil

icon Visual Basic u Excelu09.01.2012. u 16:01 - pre 149 meseci
Ljudi treba mi pomoc oko jednog zadatka koji glasi : "U Visual Basic-u napraviti program koji crta Paskalovu piramidu. Treba da uzme
parametar N i da ispisuje brojeve u celijama do nivoa N (u primeru je N=6)".
Stvarno bih vam bio zahvalan.

1 1 1 1 1 1
1 2 3 4 5
1 3 6 10
1 4 10
1 5
1

[Ovu poruku je menjao brzi62s dana 09.01.2012. u 17:14 GMT+1]
 
Odgovor na temu

timmy
Jovan Timotijevic

Član broj: 37087
Poruke: 634

Sajt: www.e-tim.net


+89 Profil

icon Re: Visual Basic u Excelu09.01.2012. u 16:49 - pre 149 meseci
Probaj ovako:

Code:
Public Sub PaskalovaPiramida(n As Integer)
Dim i As Integer
Dim j As Integer
Dim k As Integer
    For i = 0 To n
        k = 1
        For j = 0 To n
            If j >= i Then
                Cells(i + 1, k) = Application.WorksheetFunction.Combin(j, i)
                k = k + 1
            End If
        Next j
    Next i
End Sub


Pozdrav
 
Odgovor na temu

brzi62s
Informaticki Fakultet
Beograd

Član broj: 296915
Poruke: 7
*.cpe.vektor.net.



Profil

icon Re: Visual Basic u Excelu09.01.2012. u 17:17 - pre 149 meseci
Brate gde da kopiram,ja kopiram u moduls i nece da mi radi.
treba te cifre da mi ispise na radnoj stranici.
Hvala jos jednom
 
Odgovor na temu

timmy
Jovan Timotijevic

Član broj: 37087
Poruke: 634

Sajt: www.e-tim.net


+89 Profil

icon Re: Visual Basic u Excelu09.01.2012. u 18:59 - pre 149 meseci
Iskopiraj u modul, pozivas bilo iz koda radnog lista ili iz drugog modula ili iz immediate prozora sa npr.

Code:

PaskalovaPiramida 5


Pozdrav
 
Odgovor na temu

brzi62s
Informaticki Fakultet
Beograd

Član broj: 296915
Poruke: 7
*.cpe.vektor.net.



Profil

icon Re: Visual Basic u Excelu09.01.2012. u 22:08 - pre 149 meseci
Brate iskopiro sam i sad mi radi samo sam malo promenio
Option explicit
Sub main()
Dim n As Integer
Dim i As Integer
Dim j As Integer
Dim k As Integer
n = InputBox("Duzina paskalovog trougla")
For i = 0 To n-1
k = 1
For j = 0 To n-1
If j >= i Then
Cells(i + 1, k) = Application.WorksheetFunction.Combin(j, i)
k = k + 1
End If
Next j
Next i
End Sub

Imam samo jedan mali problem kada unesem 6 posle samo hoce ako je neki veci broj
ali ako je manj broj onda nece.
Hvala



[Ovu poruku je menjao brzi62s dana 09.01.2012. u 23:30 GMT+1]
 
Odgovor na temu

FOX028
Visoka tehnicka skola strukovnih studija
Kosovska Mitrovica

Član broj: 258986
Poruke: 850

Sajt: https://www.zile028.com


+49 Profil

icon Re: Visual Basic u Excelu09.01.2012. u 23:36 - pre 149 meseci
Odradio sam nesto, mada nije ista forma kao sto si naveo ali moze da posluzi. Oyvori VBA editor i u Sheet1 je kod odatle ga mozes i pokrenuti, n je nivo trougla.
Prikačeni fajlovi
 
Odgovor na temu

timmy
Jovan Timotijevic

Član broj: 37087
Poruke: 634

Sajt: www.e-tim.net


+89 Profil

icon Re: Visual Basic u Excelu09.01.2012. u 23:46 - pre 149 meseci
Citat:
brzi62s: Brate iskopiro sam i sad mi radi samo sam malo promenio

Imam samo jedan mali problem kada unesem 6 posle samo hoce ako je neki veci broj
ali ako je manj broj onda nece.
Hvala


Ma radi i za manje nego treba obrisati list da bi video da se celije ponovo popunjavaju.

Dodaj na pocetak procedure

Code:
UsedRange.Clear


Pozdrav
 
Odgovor na temu

brzi62s
Informaticki Fakultet
Beograd

Član broj: 296915
Poruke: 7
*.cpe.vektor.net.



Profil

icon Re: Visual Basic u Excelu10.01.2012. u 14:09 - pre 149 meseci
timmy hvala puno.
radi sve ali sad imam dva druga problema pa ako bi mogao
da mi pomognes:1. Isprogramirajte funkciju koja uzima ulaz N i ispisuje u Excel tabelu sve proste brojeve od
1 do N (jedan za drugim bez razmaka u redovima, u koloni A)
2.Napišite program u Visual Basic-u koji ucitava integer N i iscrtava sledecu šaru u Excel
tabeli (u primeru je N=15 i N mora da bude neparan broj):
nznm da stavim sliku ali uglavnom sara ide u x
kao ovako napr x
x
x
i za odredjeni broj napr 15 x-ova dijagonala je 15 crnih kvadratica sa jedne i 15 sa druge nadam se da me razumes
i to ulazi u novi x od 15 ali im je ona koja ih spaja ista crna tj drugi iks ima 14.
Samo mi kazi kako sliku da okacim i stavljam ti.
Hvala jos jednom za prvo resenje
 
Odgovor na temu

vacikavr92
beograd, srbija

Član broj: 296991
Poruke: 2
*.beogrid.net.



Profil

icon Visual Basic u Excelu10.01.2012. u 15:12 - pre 149 meseci
Jer moze mala pomoc????
Imam zadatak u vb-u u excel-u...pa ako neko moze da mi pomogne....
evo teksta zadatka...
Isprogramirajte piramidu: 1,121, 12321, 1234321, ... za dati ulaz N. Brojevi se
dijagonalno ispisuju u Excel tabelu do nivoa N (u primeru je N=5)
upload sam sliku kako zadatak izgleda...
unapred hvala.....
Prikačeni fajlovi
 
Odgovor na temu

Brodoplovac
Beograd

Član broj: 171299
Poruke: 838
*.adsl.verat.net.



+166 Profil

icon Re: Visual Basic u Excelu10.01.2012. u 16:27 - pre 149 meseci
Code:

Sub Kreni()
Piramida (10)
End Sub

Sub Piramida(N As Long)
On Error GoTo Handler
For i = 1 To 2 * N - 1 Step 2
    For j = 1 To i
        dodatak = Cells(i - j, j - 1)
        Cells(i - j + 1, j) = 1 + dodatak
    Next j
Next i

Exit Sub
Handler:
    dodatak = 0
    Resume Next
End Sub
 
Odgovor na temu

vacikavr92
beograd, srbija

Član broj: 296991
Poruke: 2
*.beogrid.net.



Profil

icon Re: Visual Basic u Excelu10.01.2012. u 17:05 - pre 149 meseci
Hvala ti puno...:D
 
Odgovor na temu

brzi62s
Informaticki Fakultet
Beograd

Član broj: 296915
Poruke: 7
*.dynamic.isp.telekom.rs.



Profil

icon Re: Visual Basic u Excelu10.01.2012. u 22:43 - pre 149 meseci
Jel moze pomoc za "Isprogramirajte funkciju koja uzima ulaz N i ispisuje u Excel tabelu sve proste brojeve od
1 do N (jedan za drugim bez razmaka u redovima, u koloni A)"?
 
Odgovor na temu

brzi62s
Informaticki Fakultet
Beograd

Član broj: 296915
Poruke: 7
*.dynamic.isp.telekom.rs.



Profil

icon Re: Visual Basic u Excelu10.01.2012. u 22:55 - pre 149 meseci
I ovaj drugi ako moze imam rok do 12,bio bh vam jako zahvalan.
 
Odgovor na temu

loto17

Član broj: 184930
Poruke: 110
*.dynamic.isp.telekom.rs.



+4 Profil

icon Re: Visual Basic u Excelu11.01.2012. u 19:23 - pre 149 meseci
Za dvojku dovoljno!

Šaraj malo !

Sub Kreni()
SarajMalo (15)
End Sub

Sub SarajMalo(N As Long)
On Error GoTo Handler

For i = 1 To (N / 2) + 1
Cells(i, (N + i) - N).Interior.Color = RGB(0, 0, 0)
Cells(i, (N + 1 - i)).Interior.Color = RGB(0, 0, 0)
Next i

For j = 8 To (N)
Cells(j, (N + j) - N).Interior.Color = RGB(0, 0, 0)
Cells(j, (N + 1 - j)).Interior.Color = RGB(0, 0, 0)
Next j

Exit Sub
Handler:
dodatak = 0
Resume Next
End Sub
 
Odgovor na temu

alenichev
Hujdur Alen
Sarajevo

Član broj: 213460
Poruke: 10
178.77.10.*



Profil

icon Re: Visual Basic u Excelu15.12.2012. u 21:00 - pre 138 meseci
Pozdrav svima,

nadam se da nisam fulio sekciju, naime ja imam jedan mali problem sa jednom excelomvom tabelom. Nju sam konvertovao iz pdf-a i sad bi je trebao malo srediti. Ako postoji VB code da napravi dopunu podataka na mjestima gdje bi poslije dobio još jednu kolonu pa poslije toga mogao tačno filtrirati podatke.
Prikačeni fajlovi
 
Odgovor na temu

alenichev
Hujdur Alen
Sarajevo

Član broj: 213460
Poruke: 10
178.77.10.*



Profil

icon Re: Visual Basic u Excelu15.12.2012. u 21:05 - pre 138 meseci
prvi sheet je original iz pdf-a, a drugi sheet sam dopunio onako kako sam zamislio da treba...sad me zanima da li je to moguće napraviti da se mogu npr sortirati-filtrirati osobe...Unaprije zahvalan!
Lijep pozdrav,
Alen
 
Odgovor na temu

Misureee
Milos Nikolic
Srbija

Član broj: 331705
Poruke: 2
188.117.224.*



Profil

icon Re: Visual Basic u Excelu24.12.2015. u 17:51 - pre 101 meseci
Zamolio bih za pomoc uz objasnjenje ako je neko u mogucnosti zaista mi je potrebno.
Zadatak glasi : Napišite program koji ispisuje „paskalovu“ piramidu u Excel tabeli. Kao ulaz se uzima dubina piramide (broj nivoa). Vrh piramide se nalazi u ćeliji A1, sledeći nivo u [A2, B1],
 
Odgovor na temu

captPicard
programer
more i planine

Član broj: 216084
Poruke: 1119



+19 Profil

icon Re: Visual Basic u Excelu28.12.2015. u 19:31 - pre 101 meseci
Pa imaš gore gotovo rješenje, jesi pročitao od početka?
F
 
Odgovor na temu

mmiloss
Student
Beograd, Srbija

Član broj: 347596
Poruke: 1
*.mediaworksit.net.



Profil

icon Re: Visual Basic u Excelu28.11.2022. u 22:47 - pre 16 meseci
Moze pomoc oko ovog slicnog zadatka. Mislim sve je isto samo treba da se prazne ćelije oboje crnom bojom. Hvala!

MMIlos
Prikačeni fajlovi
 
Odgovor na temu

[es] :: Visual Basic 6 :: Visual Basic u Excelu

[ Pregleda: 7787 | Odgovora: 18 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.