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

• #2326 vilag tag Tomaaasz #2325

  Új Válasz 2014-01-09 11:19:28 #2326

  Ú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

  

  vilag

  tag

  válasz Tomaaasz #2325 üzenetére

  Nem egészen.

  Én azt szeretném, hogy amikor megnyitok egy adott excel fájlt, akkor az abban lévő programkód (megadott feltétel alapján) döntse el, hogy írásra vagy olvasásra nyílik meg. Csak egy fájlról van szó, nincs második.

  Egy alábbi félmegoldás van, mert abban az esetben induláskor megkérdezi, hogy írásra vagy olvasásra akarom e megnyitni:

  Private Sub Workbook_Open()
  ActiveWorkbook.ReadOnlyRecommended = True
  End Sub

  Én viszont azt szeretném ha nem tenné fel a kérdést.

  Kb. így:

  If felhasználó = admin then
  megnyitás írásra
  Else
  megnyitás olvasásra
  End if

• #2234 Tomaaasz aktív tag Tomaaasz #2233

  Új Válasz 2013-11-06 19:12:42 #2234

  Ú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

  

  Tomaaasz

  aktív tag

  válasz Tomaaasz #2233 üzenetére

  Nos, közben siker.

  Do While szamlalo < maxSor
  azonTomb(szamlalo) = ds.Tables("Azon").Rows(szamlalo).Item("Azonosító")
  Dim txt1 As New TextBox
  Me.Controls.Add(txt1)
  With txt1
  .Name = "txtAzon" & szamlalo
  .Text = azonTomb(szamlalo)
  .Height = 20
  .Width = 50
  .Left = 10
  .Top = 10 * szamlalo * 2
  End With
  txt1 = Nothing
  szamlalo = szamlalo + 1
  Loop

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