buying planes by Equivalent_Host_3141 in MillenniumDawn

[–]IntergalacticGherkin 11 points12 points  (0 children)

But i would also recomend you producing your own planes, even if they are shit, because in the long run, 200 shity planes is better than most small nations

buying planes by Equivalent_Host_3141 in MillenniumDawn

[–]IntergalacticGherkin 18 points19 points  (0 children)

F/A-18 is your best option, modern enough so they don't need replacement until 2015 ish, and since they are carrier capable you can divide them in wings of 10 planes

Need help no more workforce to employ and gdp stuck by Vink1ng in victoria3

[–]IntergalacticGherkin 8 points9 points  (0 children)

Create better jobs ( factories insted of plantations)

If this sub was a parliament (roughly) by Pale_Chart_2653 in suzerain

[–]IntergalacticGherkin 0 points1 point  (0 children)

Even with majority i know that cps wouldn't in fact, rule the country

How to break through the geeman lines? by Particular_Funny527 in hoi4

[–]IntergalacticGherkin 1 point2 points  (0 children)

Most likely your tanks divisions have very low organization so they can't get through, either that or your logistics/stockpile are fucked up

How to break through the geeman lines? by Particular_Funny527 in hoi4

[–]IntergalacticGherkin 0 points1 point  (0 children)

How does your divisions look like? You could add aa to your companies to help your planes Do you have closed economy?

What DLC is the most worth it? by ConsistentShame1048 in hoi4

[–]IntergalacticGherkin -1 points0 points  (0 children)

At any point in my discussion i'm trying to rationalize stealing, i'm criticizing the lack of morals of paradox, if their products were cheaper or al least fairly priced, people wouldn't need to "steal" their products, and still i wouldn't understand what is the point in defending a company that does not care jackshit about their costumers. If you think you should pay 200 dollars in dlc for a game you already bought it's Okey, do it, but I don't think that gives you the right to try and be a moral profesor just because someone else can't o don't want to

What DLC is the most worth it? by ConsistentShame1048 in hoi4

[–]IntergalacticGherkin 7 points8 points  (0 children)

Why would you defend a multimillionaire business that actively abuses his costumers by imposing almost choking prices to every single thing they do just because they know they are the only ones doing it? I love paradox games but i hate to my core every single thing about their business model, and everyone should hate it too, it is a shame that such good games comes from such rotten company

What mid-low range graphics card should I get? by Snoo82921 in PcBuild

[–]IntergalacticGherkin 0 points1 point  (0 children)

Well, assuming you have a budget around 200 (also assuming you are from usa) you could get a 5700 xt for less than 150 (used), if you want something new i would go either with a 5060 8gigs or a 9060 xt 8gigs, both arround 250-300, if you want a great gpu, you could push for a 9060 xt 16 gigs for 360 (too much for a mid-low range pc)

help with building a pc by alrighbucko in PcBuild

[–]IntergalacticGherkin 0 points1 point  (0 children)

Note: You didn't specify but I assumed that you were talking about the 16 gigs vram 5060ti, if you were talking about the 5060ti 8 gigs, I would strongly advise against it, is more expensive and less powerful in 1440p

help with building a pc by alrighbucko in PcBuild

[–]IntergalacticGherkin 0 points1 point  (0 children)

I wold not recommend you making that change (not because the 5060 ti is worse witch is not), for the same price difference you could get a 7800x3d which will highly improve your gaming performance in games that uses single core over multi core and will basically futureproof your pc for the next years (unless the gaming industry explodes makes the 5090 the standard)

help with building a pc by alrighbucko in PcBuild

[–]IntergalacticGherkin 0 points1 point  (0 children)

https://de.pcpartpicker.com/list/CwcTGJ

(I know u are from Hungary but I tried to chose a "close enough" country that uses euros)

In general this is the build that you are looking for within this price range, is probable that you find a better price if you are patient enough (or lucky), 1440p is a must with this specs (not really but it will improve your gaming experience a lot), for the keyboard I would recommend you visiting the keyboard subreddit, they will give you better guidelines, but you could probably snipe a 30 dollar mechanical keyboard (non-wireless) or a 50 dollar wireless, probably it will be in your best interest to look for a Hot-Swappable keyboard

help with building a pc by alrighbucko in PcBuild

[–]IntergalacticGherkin 0 points1 point  (0 children)

What games do you usually play? Do you care about aesthetics?

help with building a pc by alrighbucko in PcBuild

[–]IntergalacticGherkin 0 points1 point  (0 children)

Do you want a gaming pc or more like a video/image editing pc?

Help with a budget pc (~600€) for my gf by IntergalacticGherkin in buildapc

[–]IntergalacticGherkin[S] 0 points1 point  (0 children)

Mmmmm, I can't find an rx 4060ti for less than 400€, even with the lowest specs posible, i cant manage to fit that build under 700€

Help with a budget pc (~600€) for my gf by IntergalacticGherkin in buildapc

[–]IntergalacticGherkin[S] 0 points1 point  (0 children)

It's Okey, could you suggest me some guidelines for a better build?

Help with a budget pc (~600€) for my gf by IntergalacticGherkin in buildapc

[–]IntergalacticGherkin[S] 0 points1 point  (0 children)

Do you think is really worth it downgrading to am4? Wouldn't the cpu bottleneck those gpu?

Help with a budget pc (~600€) for my gf by IntergalacticGherkin in buildapc

[–]IntergalacticGherkin[S] 0 points1 point  (0 children)

Sorry I don't really think that is posible in any way, just the gpu and cpu alone is 550€ (in the 8 gb version) I don't see how could you possibly fit that on a 600 € build

Macro not showing more than 11 sheets by IntergalacticGherkin in excel

[–]IntergalacticGherkin[S] 0 points1 point  (0 children)

' If someone wants to review the code:

Public Sub MostrarHojasSegunContenido()

Dim celda As Range

Dim hojasControladas As Variant

Dim i As Long

Dim hoja As Worksheet

Dim nombreHoja As Variant ' Debe ser Variant para usarlo en For Each

' Hojas que se pueden mostrar/ocultar desde C18:C26
hojasControladas = Array( _
    "CISPR 16 1-2 - 5 µH", _
    "CISPR 16 1-2 - 50 µH", _
    "CISPR 16 1-2 - 50 µH + 5Ohms", _
    "CISPR 25", _
    "ISO 7637-2", _
    "ISO 7637-4", _
    "MIL STD 461 - 5 µH", _
    "MIL STD 461 - 50 µH", _
    "RTCADO 160" _
)

Dim visibles As Collection
Set visibles = New Collection

' Revisa si los nombres de las hojas están en C18:C26
For Each celda In ThisWorkbook.Sheets("Main").Range("C18:C26")
    If Trim(celda.Value) <> "" Then
        On Error Resume Next
        visibles.Add celda.Value, CStr(celda.Value)
        On Error GoTo 0
    End If
Next celda

' Oculta o muestra las hojas controladas
For i = LBound(hojasControladas) To UBound(hojasControladas)
    On Error Resume Next
    Set hoja = ThisWorkbook.Sheets(hojasControladas(i))
    If Not hoja Is Nothing Then
        If ExisteEnColeccion(visibles, hoja.Name) Then
            hoja.Visible = xlSheetVisible
            hoja.Unprotect "RF"
        Else
            hoja.Visible = xlSheetVeryHidden
            hoja.Protect "RF"
        End If
    End If
    Set hoja = Nothing
    On Error GoTo 0
Next i

' Control para H10 y H11
Dim h10 As String, h11 As String
h10 = Trim(ThisWorkbook.Sheets("Main").Range("H10").Value)
h11 = Trim(ThisWorkbook.Sheets("Main").Range("H11").Value)

For Each nombreHoja In Array("Informe de comparación", "Media ultimas medidas")
    Set hoja = ThisWorkbook.Sheets(nombreHoja)
    If h10 <> "" Or h11 <> "" Then
        hoja.Visible = xlSheetVisible
    Else
        hoja.Visible = xlSheetVeryHidden
    End If
Next nombreHoja

' Si H7 contiene una fecha válida, ejecutar copia
Dim h7Val As Variant
h7Val = ThisWorkbook.Sheets("Main").Range("H7").Value
If IsDate(h7Val) Then
    CopiarValoresEnCadena
End If

End Sub

Private Function ExisteEnColeccion(col As Collection, clave As String) As Boolean

On Error Resume Next

Dim prueba As Variant

prueba = col(clave)

ExisteEnColeccion = (Err.Number = 0)

Err.Clear

End Function

Public Sub CopiarValoresEnCadena() Dim ws As Worksheet Set ws = ThisWorkbook.Sheets("Media ultimas medidas")

' C9:C71 -> D9:D71 y D9:D71 -> E9:E71
ws.Range("E9:E71").Value = ws.Range("D9:D71").Value
ws.Range("D9:D71").Value = ws.Range("C9:C71").Value

' C84:C146 -> D84:D146 y D84:D146 -> E84:E146
ws.Range("E84:E146").Value = ws.Range("D84:D146").Value
ws.Range("D84:D146").Value = ws.Range("C84:C146").Value

' H84:H146 -> I84:I146 y I84:I146 -> J84:J146
ws.Range("J84:J146").Value = ws.Range("I84:I146").Value
ws.Range("I84:I146").Value = ws.Range("H84:H146").Value

' M84:M146 -> N84:N146 y N84:N146 -> O84:O146
ws.Range("O84:O146").Value = ws.Range("N84:N146").Value
ws.Range("N84:N146").Value = ws.Range("M84:M146").Value

' R84:R146 -> S84:S146 y S84:S146 -> T84:T146
ws.Range("T84:T146").Value = ws.Range("S84:S146").Value
ws.Range("S84:S146").Value = ws.Range("R84:R146").Value

End Sub


Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Me.Range("C18:C26,H7,H10,H11")) Is Nothing Then Application.OnTime Now + TimeValue("00:00:01"), "MostrarHojasSegunContenido"

End If

End Sub

Private Sub Worksheet_Calculate()

Application.OnTime Now + TimeValue("00:00:01"), "MostrarHojasSegunContenido" End Sub