- Egyre több európai használja a Telegramot, ezért megkereste az EU
- Ha Trump győz, Elon Musk politikai tanácsadó lehet
- Vodafone otthoni szolgáltatások (TV, internet, telefon)
- PHP programozás
- Zimbabwébe ment a Starlink
- Már nem hisz a nagy európai EV-forradalomban a Ford
- QNAP hálózati adattárolók (NAS)
- Középpontba kerültek a hibrid autók, alig fogyaszt a BYD újdonsága
- Bittorrent topik
- A marketingen segít spórolni az AI
-
IT café
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
Delila_1
Topikgazda
válasz bteebi #20342 üzenetére
Nálam csont nélkül végrehajtotta.
Próbáld meg, hogy a Lista laphoz ennyit rendelsz:Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then Cimsor
End SubEgy modulba pedig ezt:
Sub Cimsor()
Dim lap%
For lap% = 1 To Worksheets.Count
If Sheets(lap%).Name <> "Lista" Then
Sheets(lap%).PageSetup.CenterHeader = "Szín: " & Sheets("Lista").Range("A1").Value
End If
Next
End SubProgramozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
Új hozzászólás Aktív témák
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: Alpha Laptopszerviz Kft.
Város: Pécs