Jeigu yra būdas padaryti geriau, atrask jį. T. A. Edison

Sveiki, Svečias
Prisijungimo vardas: Slaptažodis: Prisiminti mane
  • Puslapis:
  • 1

TEMA: Excel visual basic

Excel visual basic prieš 2 m. 9 mėn. #1

  • qxer7034
  • qxer7034 avataras
  • Neprisijungęs
  • Naujokas
  • Žinutės: 2
  • Reputacija: 0
Sveiki, niekaip nepavyksta atlikti šios užduoties: :(
Mygtuko paspaudimu nustatykite ar galima sudaryti trikampį, kurio kraštinės būtų lygios ląstelėse A1,
A2 ir A3 nurodytoms reikšmėms. Norint sudaryti trikampį, ilgiausia jo kraštinė turi būti trumpesnė už kitų dviejų kraštinių ilgių sumą.
Ačiū.
Paskutinis taisymas: prieš 2 m. 9 mėn. nuo qxer7034.
Administratorius uždraudė viešą pranešimų rašymą.

Excel visual basic prieš 2 m. 9 mėn. #2

  • hattrick
  • hattrick avataras
  • Neprisijungęs
  • Veteranas
  • Žinutės: 60
  • Gauta padėka 35
  • Reputacija: 8
Sveikas,

Easy :) Manau, kad kodas galėtų būti toks:


Sub Trikampis()

If WorksheetFunction.Max(Range("A1:A3")) < WorksheetFunction.Sum(Range("A1:A3")) -
WorksheetFunction.Max(Range("A1:A3")) Then

MsgBox ("Galima")

Else

MsgBox ("Negalima")

End If

End Sub
Paskutinis taisymas: prieš 2 m. 9 mėn. nuo hattrick.
Administratorius uždraudė viešą pranešimų rašymą.
Jums padėkojo šie nariai: qxer7034

Excel visual basic prieš 2 m. 9 mėn. #3

  • qxer7034
  • qxer7034 avataras
  • Neprisijungęs
  • Naujokas
  • Žinutės: 2
  • Reputacija: 0
Hattrick, ačiū labai, viskas puikiai veikia :woohoo:
Administratorius uždraudė viešą pranešimų rašymą.
  • Puslapis:
  • 1
Puslapio sukūrimo laikas: 0.314 sekundžių