Új hozzászólás Aktív témák

• #52736 lanszelot addikt föccer #52733

  Új Válasz 2024-05-28 23:34:34 #52736

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  lanszelot

  addikt

  válasz föccer #52733 üzenetére

  Huhhh, nagyon szépen köszönöm mindenkinek a segítséget.

  Nem hangzik bonyolultnak
  Persze át kell rágnom magam rajta, de szerintem nem lesz gond.

  Fferi50: a link is nagyon jó, köszönöm szépen.
  Így már rá is tudok keresni.

  Access -ben tudtam, hogy van programozás rész (nem csináltam, csak tudtam róla) , de excel-ről nem tudtam.

• #52734 föccer nagyúr föccer #52733

  Új Válasz 2024-05-28 21:47:28 #52734

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  föccer

  nagyúr

  válasz föccer #52733 üzenetére

  Ez alapján meg fogod tudni csinálni.

  Sub Szorzas()
Dim Sor As Long
Dim Oszlop As Long
Dim S As String
Dim Szorzo As Double
S = "Munka2"
Szorzo = Sheets("Munka1").Range("A1").Value
For Sor = 1 To 20
  For Oszlop = 1 To 20
    Sheets(S).Cells(Sor, Oszlop).Value = Sheets(S).Cells(Sor, Oszlop).Value * Szorzo
  Next
Next
End Sub

Új hozzászólás Aktív témák