[kris27]

Jutro 8:00 kolos z informatyki tzn. programowanie w VBA w excelu xD prawdopodobnie będą takie zadania jak na zdjęciu. Tak sie składa, że jestem zielony w programowaniu i potrzebuje pomocy. Jestem na transporcie jakby co więc śmieszki od #programowanie sobie odpuście ( ͡° ʖ̯ ͡°)
PS. 1 zadanie umiem XD
#excel #vba

[kris27]

tu przybliżone

[DawajDawaj]

@kris27: Toż to proste jak budowa cepa

[kris27]

@dawajdawaj to dawaj pomusz :(

[kris27]

@dawajdawaj chociaz 4 ( ͡° ͜ʖ ͡°)

[irekgr1]

@kris27: mam trudniejsze do zdania technikum obecnie

[DawajDawaj]

@kris27: Panie ja tylko zwyklym grabarzem jestem.

[croppz]

@kris27: łap rozwiązanie do trzeciego, może starczy żeby dostać 3.

[JanKremovski]

@kris27: Jeżeli w 4 zadaniu przez "wskazaną kolumnę" rozumiemy zaznaczenie jednej kolumny, to:

Sub cztery()
Dim Cell, cMaxAddr As Range
Dim cMax As

[kris27]

@croppz
@JanKremovski
Dzięki wielkie. Co do tego to czegos tam brakuje. "Object variable or with block variable not set"

[JanKremovski]

@kris27: Tak jak napisałem, musisz najpierw zaznaczyć jakąś kolumnę a potem uruchomić.

[kris27]

@Jankremovski a gdyby trzeba bylo znaleźć najmniejszą zamiast największej? Co by tu trzeba było zmienić?

[DarkAlchemy]

@kris27: Masz jeszcze trzy pierwsze ;)

Sub Zad1()

If x <> y And x < y Then
x

[DarkAlchemy]

@kris27: I jeszcze to:

Sub Zad8()

Select Case Asc(Left(ActiveSheet.Cells(1, 1).Value,

[JanKremovski]

@kris27: Poprawiłem kod. Poniżej masz na najmniejszą, a jak zmienisz znak w linii "If Cell < cMax Then" to będzie największa.

Sub cztery()
Dim Cell, cMaxAddr As Range
Dim cMax As

[JanKremovski]

@kris27: Zadanie 10:

Sub zad10()
Dim sRng As Range: Set sRng = Range("B1:F1")
Dim Cell As Range
Dim Lp, Ln

[kris27]

@jankremovski
@darkalchemy
Wielkie pozdro i dzięki. Trzymajcie jutro kciuki żebym to zerżnął (づ•﹏•)づ

[kris27]

@JanKremovski: na kolosie miałem to zadanie właśnie co pisałeś, tylko żeby zaznaczyć wiersz jakiś zamiast kolumny. Działało i pokazuje profesorowi a on powiedział, że nic z tego nie rozumie co napisalem i żebym to poprawił, no i brakowalo mi tego zadania żeby zdać i poprawa końcem stycznia ja p------e xd

[JanKremovski]

@kris27 ja p------e.. i tak przez całą edukację..