Viop LVİ

[nohut]

CNN International
@cnni
·
26d
An aftershock of a preliminary magnitude 4.0 has struck New Jersey, USGS says.

Follow live updates.

[nohut]

Bu başlığı şu anda 36 kişi okumaktadır. (2 üye ve 34 ziyaretçi)

nohut, ozzy

Hayırlı geceler....
Oruç tutanlara bereketli sahur sofraları dilerim.

[EMLAK]

cehape

mukaddes akplilerin kaldırmış olduğu TC tabelalarını yeniden takıyor.

https://www.youtube.com/watch?v=SQu-XyyR2Hg

[Bear_Bull]

Sattım çanta işini.. İzmir'e gidiyoruz iki araç. Dikkat ederim sağol. İyi bayramlar.

Sub XX()
Range("A2").Select
Dim rowId As Integer
rowId = 2
While (ActiveCell.Text <> "")
rowId = rowId + 1
ActiveCell.Offset(1, 0).Activate
Wend

rowId = rowId - 1
Dim aStr As String
aStr = "A2:A" & CStr(rowId)
MsgBox (aStr)
''SaveAsDelimitedFile Range(aStr )
End Sub 

sağolasın eline sağlık, uğraştırdı biraz
ama yap boz, dene boz ile yaptım çalışıyor şimdi .
iyi yolculuklar. iyi bayramlar.

    Option Explicit Sub SaveAsDelimitedFile(Rng As Range, _  FileName As String, _  Optional ColDelimiter As String = "|", _  Optional RowDelimiter As String = vbCrLf)   Dim hFile As Long  Dim vData As Variant  Dim nRow As Long, nCol As Long     On Error GoTo SaveAs_Err     hFile = FreeFile()  Open FileName For Output As #hFile     vData = Rng.Value2  For nRow = 1 To UBound(vData, 1)    For nCol = 1 To UBound(vData, 2) - 1      Print #hFile, vData(nRow, nCol); ColDelimiter;    Next    Print #hFile, vData(nRow, nCol); RowDelimiter;  Next   Close #hFile   SaveAs_Exit:  Exit Sub   SaveAs_Err:  MsgBox Err.Description, vbCritical  Resume SaveAs_Exit   End Sub

Sub TestSaveAs()Dim aRange As RangeRange("A1").SelectDim rowId As IntegerrowId = 1While (ActiveCell.Text <> "")rowId = rowId + 1ActiveCell.Offset(1, 0).ActivateWend
rowId = rowId - 1Dim aStr As StringaStr = "L" & CStr(rowId)Set aRange = Range("A1", aStr)   SaveAsDelimitedFile aRange, "D:\ideal\SembolListeleri\Vdl_Spot_Arbitraj_BB_2024.BB"End Sub 

[ariston]

Elektrik üretimi ve kurulu güç raporuna bakınca doğalgaz santralleri kapasitesinin çok azı kullanılıyor, ithal kömür santralleri muhtemelen en az 16 saat tam gaz çalışıyor. Çelik endüstrisi yavaşlayınca taş kömürü ucuzluyor.

Güneş kapasitesi artıyor ama günde 4-5 saat verimli çalışıyordur.

Rüzgar geceleri de çalışıyor ama rüzgar olmayınca üretemiyorlar, muhtemelen o zamanlarda doğalgaz santrallerine talimat gidiyor.

Jeotermal ve biogaz da üretimde önemli yer tutuyor.

[ariston]

Elektrik fiyatları geçen seneye göre TL olarak bile ciddi düşmüş.

Elektrik üreticilerinden zayıf bilançolar gelmesi normal, borcu çok olanlar zarar da yazabilir ilk çeyrek.

"Bay Kemal elektrik faturasının yarısını biz ödüyoruz" artık geçerli değil, fiyatlar düşmüş indirim bile yapılmalı.

Dondurulmuş ürünlere korkunç zamlar oldu, bakkalar sattığımız soğuk meşrubat ve dondurmanın fiyatı elektrik bedelini karşılamıyor deyip fişi çekmişti, tostlara zam yapılmıştı.

Petibör ve finger bisküvide rekabet var fiyatları geçen seneye göre indirdiler.

[keremalkm]

Tuncay Turşucu
Yabancı fon girişi olmuş, MB bozdurulan dövizi almış olabilir..

Bir başkası, yabancı fon girişi olmuş, borsa %10 yükselmiş.
Sonrasında %35 düşmüş.. der..

SM-A336E cihazımdan Tapatalk kullanılarak gönderildi

[el turco]

vesbe 5 milyar civarı kar açıklamış. şimdiye kadarki en iyi bilanço olabilir.

hollandadaki davadan ses yok. o da vestl ile daha çok alakalı.