Zum Inhalt springen

r26t01

Mitglieder
  • Gesamte Inhalte

    901
  • Benutzer seit

  • Letzter Besuch

Beiträge von r26t01

  1. Ich würde sagen, dass es normal ist, dass Azubis (in diesem Fall du) solche Aufgaben erledigen müssen. Wenn die Anweisung von deinem Ausbilder kommt, dann würde ich zusehen, dass die Aufgabe erledigt wird bzw. nicht weiter "rum mosern". Das gehört in den ersten Jahren dazu.

    Aber wenn andere Azubis mir Anweisungen geben wollen, oder ihre Aufgaben an mich weitergeben, dann würde ich schon was sagen. Du bist nicht dafür zuständig, dass deren Aufgaben erledigt werden.

  2. Ich würde es ein bisschen umformulieren:

    Sehr geehrte Frau xxxxx,

    In/bei xxxxx wurde mein Interesse durch eine Stellenanzeige Ihrerseits geweckt.

    Meine Ausbildung als FA - SI (ausgeschrieben ;)) hab ich erfolgreich abgeschlossen und möchte nun meine Fähigkeiten in Ihrem Unternehmen unter Beweis stellen.

    Ich bringe viel Erfahrung im PC- und Notebookbereich mit, die ich teils durch meine Ausbildung, teils aufgrund meines privaten Interesses an der Materie erlernt habe. Zusätzlich bereitet mir sorgfältiges und zielorientiertes Arbeiten im IT-Sektor Freude.

    Über mich und mein Arbeitsverhalten kann ich sagen, dass ich zuverlässig, ruhig, selbständig und freundlich bin, wodurch ich meinen Beitrag leiste, Ihr Team zu unterstützen.

    Gerne überzeuge ich Sie in einem persönlichen Gespräch von meinen Qualifikationen, meiner Arbeitshaltung und meinem Ehrgeiz.

    Mit freundlichen Grüßen

    xxxxx

    Anlagen:

    Lebenslauf

    Zeugnisse

  3. Also, ich habe bereits folgenden Code für Dez => Hex und Hex => Dez. Der soll jetzt aber noch ein bisschen verfeinert/vereinfacht(?) werden bzw. noch die Umrechnung nach Octal und Binär hinzufügen. Wenn man dann in eins der Felder eine Zahl eingibt, dass dann sofort in alle anderen umgerechnet wird und die von Hand eingegebene Zahl fett markiert wird.

    Sub Makro1()
    
    
    If Range("B3").value < 0 Then
    
        MsgBox "Negative Eingaben sind nicht möglich"
    
        Exit Sub
    
    End If
    
    
    If Range("B3").value = 0 Or Range("B3").value = "" Then
    
        MsgBox "Bitte etwas eingeben"
    
        Exit Sub
    
    Else
    
    
    ' Dezimal nach Hexadezimal
    
    Dim lngDezimal As Long
    
    lngDezimal = Range("B3").value
    
    MsgBox "Der Hex-Wert lautet: " & Hex$(lngDezimal)
    
    
    End If
    
    End Sub
    und
    Sub Makro2()
    
    
    If Range("B6").value < 0 Then
    
        MsgBox "Negative Eingaben sind nicht möglich"
    
        Exit Sub
    
    End If
    
    
    If Range("B6").value = 0 Or Range("B6").value = "" Then
    
        MsgBox "Bitte etwas eingeben"
    
        Exit Sub
    
    Else
    
    
    ' Hexadezimal nach Dezimal
    
    Dim strHex As String
    
    strHex = [B6]
    
    lngDezimal = CLng("&H" & strHex)
    
    MsgBox "Der Dezimalwert von Hex ist: " & _
    
    lngDezimal
    
    
    End If
    
    End Sub

    btw. hab die versch. Makros auf Schaltflächen gelegt.

  4. religion/ethik geht ja noch...

    aber sport? ich finde körperlichen ausgleich ja auch durchaus wichtig, aber den gestalte ich dann bitte selbst und unbenotet und hab wenig lust wieder unter anleitung sachen zu machen, die mir absolut keine freude bereiten

    unser Lehrer hat am 1. Tag mit uns die Halle "besichtigt" und uns gesagt, was wir machen könnten. Dann konnten wir uns so oft wir wollten für Sachen melden, die uns interessierten und danach dann nur noch 1x für etwas. Bei uns is es der Kraftraum gewesen. Mittlerweile wurde der Stundenplan aber wieder geändert und wir haben dieses Jahr kein Sport.

  5. @Langweile: Musst du keinen Ausbildungsbericht führen und den vorzeigen? Spätestens bei der Abschlussprüfung wirst du denn doch vorzeigen müssen.

    @nihat1988: Wir haben "nur" einen eigenen Dell Laptop bekommen und einen weiteren Monitor. Klar, dass der so aufgesetzt ist, dass die meisten Seiten gesperrt sind. Nur probieren wir es gar nicht erst aus, da dann sofort in der Chefetage die Alarmmeldungen aufpoppen und sich das dann auch durch die gesamte Abteilung zieht.

  6. Meine ersten 4 Wochen waren ganz interessant. In der 1. Woche haben wir die anderen Azubis der Stadt kennengelernt, ab der 2. Woche waren wir im Betrieb. Seitdem haben wir mit Stylesheets/html/frames gearbeitet, Javascript kennengelernt und befinden uns nun bei VBA. Demnächst folgt dann noch die Bildbearbeitung.

    Wir dürfen nur ins Inet, wenn es sich um etwas handelt, was mit dem Beruf zu tun hat. Sonst dürfen wir nicht surfen, etc. Alle Laufwerke und USB Anschlüsse sind außerdem gesperrt, so dass wir auch keine Dvds gucken können, o.ä.

    Bei uns sitzen die anderen FI direkt neben uns, von daher hat man immer jemanden, den man um eine Aufgabe bitten kann bzw. um Hilfe.

  7. danke für die Antwort, bin kurz danach aber selbst auf die Lösung gekommen. Es hat einfach nur ein:

    If Not IsNumeric(Range("B3").Value) Or Not IsNumeric(Range("B4").Value) Then
    
    MsgBox "Bitte geben Sie eine Zahl ein"
    
    End If

    gefehlt.

  8. Soweit hab ich den Code schon fertig, allerdings soll er nun prüfen, wenn ich die Zahlen eingebe, dass es auch Zahlen sind bzw. mir eine Fehlermeldung ausgeben, wenn sie es nicht sind (also Buchstaben)

    Sub Makro1()
    
    
    Start = Range("B3").Value
    
    Ende = Range("B4").Value
    
    
    startRow = 7
    
    
    
    Rows(startRow & ":65536").Delete
    
    
    
    If (Ende - Start) > 255 Then
    
    MsgBox "Leider stehen Ihnen nur 255 Spalten zur Verfügung"
    
    End If
    
    
    If Range("B3").Value > Range("B4").Value Then
    
        MsgBox "Der Startwert darf nicht größer als der Endwert sein"
    
    End If
    
    
    
    
    
    
    If Start = "" Then
    
        MsgBox "Bitte etwas eingeben!"
    
    Else
    
    
    For i = 1 To Ende - Start + 1 Step 1
    
        ivalue = Start + i - 1
    
        Cells(startRow + i, 1).Value = ivalue
    
    
        For j = 0 To Ende - Start + 1 Step 1
    
        jvalue = Start + j - 1
    
        If j = 0 Then
    
            Value = ivalue
    
        Else
    
            Value = jvalue * ivalue
    
        End If
    
    
    
        Cells(startRow + j, 2 + i - 1).Value = Value
    
       If jvalue = ivalue Then
    
        Cells(startRow + j, 2 + i - 1).Font.Bold = True
    
        End If
    
    
    Next j
    
    Next i
    
    
    
    Range(Cells(startRow, 1), Cells(startRow + Ende - Start + 1, 1)).Select
    
        Selection.Font.Bold = True
    
    Range(Cells(startRow, 1), Cells(startRow, Ende - Start + 2)).Select
    
        Selection.Font.Bold = True
    
    Range(Cells(startRow, 1), Cells(startRow + Ende - Start + 1, Ende - Start + 2)).Select
    
        Selection.Borders(xlDiagonalDown).LineStyle = xlNone
    
        Selection.Borders(xlDiagonalUp).LineStyle = xlNone
    
        With Selection.Borders(xlEdgeLeft)
    
            .LineStyle = xlContinuous
    
            .Weight = xlMedium
    
            .ColorIndex = xlAutomatic
    
        End With
    
        With Selection.Borders(xlEdgeTop)
    
            .LineStyle = xlContinuous
    
            .Weight = xlMedium
    
            .ColorIndex = xlAutomatic
    
        End With
    
        With Selection.Borders(xlEdgeBottom)
    
            .LineStyle = xlContinuous
    
            .Weight = xlMedium
    
            .ColorIndex = xlAutomatic
    
        End With
    
        With Selection.Borders(xlEdgeRight)
    
            .LineStyle = xlContinuous
    
            .Weight = xlMedium
    
            .ColorIndex = xlAutomatic
    
        End With
    
        Selection.Borders(xlInsideVertical).LineStyle = xlNone
    
        Selection.Borders(xlInsideHorizontal).LineStyle = xlNone
    
    
        With Selection
    
            .HorizontalAlignment = xlCenter
    
            .VerticalAlignment = xlBottom
    
            .WrapText = False
    
            .Orientation = 0
    
            .AddIndent = False
    
            .IndentLevel = 0
    
            .ShrinkToFit = False
    
            .ReadingOrder = xlContext
    
            .MergeCells = False
    
        End With
    
    Range("A1").Select
    
    
    
    Range(Cells(startRow, 1), Cells(startRow + 1, 1)).Select
    
    
        Selection.Font.Bold = True
    
    Range("A1").Select
    
        ActiveWindow.SmallScroll ToRight:=-2
    
    
    Range(Cells(startRow, 1), Cells(startRow, Ende - Start + 2)).Select
    
        Selection.Borders(xlDiagonalDown).LineStyle = xlNone
    
        Selection.Borders(xlDiagonalUp).LineStyle = xlNone
    
        With Selection.Borders(xlEdgeLeft)
    
            .LineStyle = xlContinuous
    
            .Weight = xlMedium
    
            .ColorIndex = xlAutomatic
    
        End With
    
        With Selection.Borders(xlEdgeTop)
    
            .LineStyle = xlContinuous
    
            .Weight = xlMedium
    
            .ColorIndex = xlAutomatic
    
        End With
    
        With Selection.Borders(xlEdgeBottom)
    
            .LineStyle = xlContinuous
    
            .Weight = xlThin
    
            .ColorIndex = xlAutomatic
    
        End With
    
        With Selection.Borders(xlEdgeRight)
    
            .LineStyle = xlContinuous
    
            .Weight = xlMedium
    
            .ColorIndex = xlAutomatic
    
        End With
    
        Selection.Borders(xlInsideVertical).LineStyle = xlNone
    
    Range("A1").Select
    
    
    Range(Cells(startRow, 1), Cells(startRow + Ende - Start + 1, 1)).Select
    
        Selection.Borders(xlDiagonalDown).LineStyle = xlNone
    
        Selection.Borders(xlDiagonalUp).LineStyle = xlNone
    
        With Selection.Borders(xlEdgeLeft)
    
            .LineStyle = xlContinuous
    
            .Weight = xlMedium
    
            .ColorIndex = xlAutomatic
    
        End With
    
        With Selection.Borders(xlEdgeTop)
    
            .LineStyle = xlContinuous
    
            .Weight = xlMedium
    
            .ColorIndex = xlAutomatic
    
        End With
    
        With Selection.Borders(xlEdgeBottom)
    
            .LineStyle = xlContinuous
    
            .Weight = xlMedium
    
            .ColorIndex = xlAutomatic
    
        End With
    
        With Selection.Borders(xlEdgeRight)
    
            .LineStyle = xlContinuous
    
            .Weight = xlThin
    
            .ColorIndex = xlAutomatic
    
        End With
    
    Range("A1").Select
    
    
    End If
    
    
    End Sub
    
    

  9. Ich sehs positiv, dass unser Beruf auf der 1 gelandet ist. Vielleicht verziehen sich dann mal die ganzen Vorurteile (FI sind MoFs, sitzen in ner dunklen Kammer, etc.). Mag sein, dass viele, die nicht wissen, was sie machen sollen, sich auf einmal dafür bewerben, aber eine gute Firma bzw. Personalchef sollte im Gespräch bzw. vorher im Test schon die aussieben, die nicht geeignet sind bzw. nicht qualifiziert genug.

  10. Dadurch, dass ich privat auch viel am Rechner schreibe bzw. chatte, kann ich mittlerweile auch schon blind schreiben (gelegentliches hingucken trotzdem nicht ausgeschlossen =) ). Ich selbst tippe mit nur 4 Fingern (Zeige- und Mittelfinger) und komme damit bestens zurecht und schreibe auch recht schnell. Von daher denke ich auch nicht, dass du so einen Kurs unbedingt brauchen solltest.

  11. Wir haben ein Worddokument als Vorlage, wo in Tabellenform das Datum steht und man daneben in Stichpunkten schreiben soll, was wir an dem entsprechenden Tag gemacht haben. Das gleiche auch für Berufsschultage. Wir müssen den Bericht aber täglich führen und bis zum 10. des Folgemonats abgeben.

  12. Vl. noch ein Grund, warum du dich für diesen Beruf entschieden hast:

    Du siehst es als Herausforderung an diesen Beruf auszuüben, da du andauernd auf dem neuesten Stand der Dinge sein musst, um die Kunden beraten zu können und das ist sicherlich mit jeder Menge Arbeit verbunden.

    (so in der Art hab ich das bei meiner Präsi auch erwähnt). Uns wurde im Anschreiben zur Einladung des Gesprächs aber schon gesagt, dass wir eine höchstens 15 Minütige Selbstpräsentation erstellen sollen.

    Daraufhin hab ich beim Betrieb mal nachgefragt, was für Software und Rechner/Betriebssysteme sie da haben. Nicht, dass ich meine Präsi hab und sie dann dort nicht läuft.

    Erzähl etwas über dich, deine Interessen, deine Hobbies. Meistens geht es den Leuten im Gespräch darum, etwas über dich zu erfahren, was meistens nichts mit IT zu tun hat. Sie wollen wissen, ob der Mensch vor ihnen in ihr Team passt und mit den Kollegen klar kommt.

    Versuch einfach möglichst gelassen zu sein und einen guten 1. Eindruck zu hinterlassen.

  13. Momentan kann ich hier nix runterladen, daher kann ich dir zu deiner Formatierung nichts genaues sagen.

    Ich selbst hatte auch ein paar Erfahrungen als ich angefangen habe (seit 1.8.) und das hab ich dann im Anschreiben erwähnt. Hinterher im Lebenslauf bzw. Steckbrief hab ich dann bei Hobbies nochmal kurz erwähnt, dass diese Sachen auch dazu gehören. Aber dem Personalchef geht es auch um deine Hobbies außerhalb der IT Welt.

    Azubis aus dem 2. Jahr haben uns erzählt, dass es unserem Betriebsleiter wichtig ist, dass er sozial kompetente Leute einstellt, die Freunde haben und auch ein Leben außerhalb ihrer Wohnung/ihres Zimmers bzw, Freunde außer ihrem PC haben.

  14. Dieses Jahr gab es bei uns 4 Stellen zu vergeben und nur 3 wurden genommen. Ne Freundin und ich (weiblich) bei der AE und ein Kerl für die SI. Aber bei uns in der Berufsschule sieht man dann wieder, dass doch immer noch die Mehrheit an Fachinformatikern Männer sind. Bei 31 Schülern sind wir nur 3 Mädels.

Fachinformatiker.de, 2024 by SE Internet Services

fidelogo_small.png

Schicke uns eine Nachricht!

Fachinformatiker.de ist die größte IT-Community
rund um Ausbildung, Job, Weiterbildung für IT-Fachkräfte.

Fachinformatiker.de App

Download on the App Store
Get it on Google Play

Kontakt

Hier werben?
Oder sende eine E-Mail an

Social media u. feeds

Jobboard für Fachinformatiker und IT-Fachkräfte

×
×
  • Neu erstellen...