Suche auf lima-city
-
in: Ist Visual basic out?
geschrieben von basisa
Also ich nutze es auch noch...
Ja es ist recht leicht, ähnelt VBA eben sehr das stimmt.
VBA ist eben eine abgespeckte Variante, schreibweise dahinter eben gleich + die extras für die Amwendung, zb. Excel! -
in: Meinung zur Programmiersprache Pascal als Einstieg
geschrieben von basisa
Kurse sind denle ich nicht so wichtig erst einmal...
Gerade heute mit dem Internet kann man wirklich alles nachlesen.
1 Buch am Anfang um rein zu kommen, bisschen YouTube und los geht es.
Kann wie weiter oben empfehlen:
1. Visual Basic
2. Java ( etwas schwerer ) -
in: Meinung zur Programmiersprache Pascal als Einstieg
geschrieben von basisa
Ich kann Pascal nicht empfehlen, kann man im RL nicht gebrauchen!
Musste es damals in der Berufsschule machen, seit dem nie mehr gesehen oder gebraucht.
Wenn du eine leicht zu erlernende Sprache suchst kann ich VB ( Visual Basic ) empfehlen!
Gibt es kostenlose und gute Tools von Microsoft zum Beispiel. -
in: Hardware oder Software
geschrieben von basisa
Du kannst maximal versuchen wenn du eine Windows CD/DVD hast ( muss nicht die von Win 8 oder 10 sein ) diese zu Booten und ein Wiederherstellungspunkt zu nutzen.
Immer wenn ein Update oder auch neue Treiber installiert werden , wird von Windows immer ein Wiederherstellungspunkt erzeugt um im Falle eines Defekts wieder zurück zu gehen!
Hier ein Link wie man es machen kann:
http://www.computerwissen.de/windows/windows-probleme-loesen/artikel/windows-7-systemwiederherstellung-per-windows-7-dvd.html -
in: Excel: Durch mehrere SVerweis-Ergebnisse Blättern
geschrieben von basisa
So, ich schreibe mal wieder und hoffe das meine Beiträge wieder gelöscht werden xD
(Hier ist was los)
Habe dir eine Anleitung gemacht und die Beispieldatei hochgeladen!
http://basisa.lima-city.de/Daten/Sonstiges/Anleitung/Anleitung.png
Und hier die Datei ( Beispiel.xlsm ) zum Herunterladen!
basisa.lima-city.de/Daten/Sonstiges/Anleitung/
Hier der Code (überarbeitet)
Option Explicit Sub Suchen() Dim LetzteZeile, i As Integer Columns("H:J").ClearContents 'Löscht die alte Suche For i = 2 To 9 'Suche in Zeile 2 bis 9 LetzteZeile = ActiveSheet.Cells(Rows.Count, 8).End(xlUp).Row + 1 'Sucht die letzte beschriebe Zeile und Addiert + 1 If Cells(i, 1).Value = Range("F1").Value Then ' D1 ist das Suchfeld 'Beispiel, wenn im Feld A2 der geuschte Name steht! Cells(LetzteZeile, 8).Value = Cells(i, 1).Value 'Hier wird Quasi "A2" nach "H2" kopiert Cells(LetzteZeile, 9).Value = Cells(i, 2).Value 'Hier wird Quasi "B2" nach "I2" kopiert Cells(LetzteZeile, 10).Value = Cells(i, 3).Value 'Hier wird Quasi "C2" nach "J2" kopiert End If Next End Sub -
in: Aurous - legal? illegal? schei*egal?
geschrieben von basisa
@stoerchu
Kann ich zustimmen, aber Spotify etc. kosten ja wieder was...
Und YouTube ist dafür nicht vorgesehen um Musik herunterzuladen, was ja nicht bedeutet das es nicht geht!
Und @hackyourlife
Die Technik erlaubt sowas grundsätzlich kostenfrei umzusetzen, da es eben P2P und somit dezentral ist, und deshalb auch keine zentralen Systeme wie Server o.ä. benötigt werden, die Geld kosten.
Das würde ich so nicht unterschreiben, auch wenn es nichts kosten sollte wollen diejenigen welche ( Musiker etc. ) trotzdem ihr Geld haben wenn man IHRE Musik nutzt.
Daher für mich nicht machbar! -
in: BBCODE und der zufriff auf Lima-City FTP
geschrieben von basisa
Ich danke dir erst einmal, werde es versuchen zu beantragen!
Ich hoffe das wird was.
Gruß Basisa -
in: BBCODE und der zufriff auf Lima-City FTP
geschrieben von basisa
Hi, natürlich den vernünftigen mit http:// etc.
[img]http://basisa.lima-city.de/Daten/OGame/Allianz/K.u.G/Willkommen.png[/img] -
in: Aurous - legal? illegal? schei*egal?
geschrieben von basisa
Jeder will für seine Arbeit bezahlt werden, von daher ist es schon zu verstehen!
Andererseits würde ich so etwas gerne nutzen ;)
Aber rein von der Logik geht es nicht ohne bezahlen und ohne Werbung!
Oder sehe ich das komplett falsch? -
in: BBCODE und der zufriff auf Lima-City FTP
geschrieben von basisa
Guten Tag, ich habe mal eine allgemeine Frage.
Und zwar wollte ich auf einer andere Seite Bilder verlinken die hier auf mein
FTP liegen.
Dort muss man es mit BBCODE machen, es ging vorher auch, nun bin ich hier zu Lima-City gezogen und es geht nicht mehr, verlinke ich Bilder die ich bei Google gesucht habe geht das ohne Probleme.
Ist das irgendwie gesperrt?
Gruß Basisa -
in: The Witcher 3
geschrieben von basisa
Als der 3 Teil angekündigt wurde habe ich Teil 1 und 2 vorher gespielt, die sind auch gut aber schwieriger...
Teil 2 kann ich sehr empfehlen und kosten auch nichts mehr, also wenig eben! -
in: Excel: Eingabe Automatisch in Feld einfügen
geschrieben von basisa
Am schnellsten und ohne 100 Formeln geht es mit VBA der per Knopfdruck oder wie man es auch immer haben mag einfach in ein neues Blatt kopiert, er kann auch prüfen wo die letzte leere Zeile liegt. Wenn du das noch benötigst kannst du mich ja gerne anschreiben! -
in: Windows 10 - Auflösung lässt sich nicht ändern
geschrieben von basisa
Was bedeutet bei dir ein Monitor Simuliert?
Meinst du sowas wie VMWare?
Und versuche mal die alten Systemeinstellungen zu nutzen und nicht das neue Menü.
Wenn das alles nicht geht ist der Treiber altuell?
Ich kann DriverBooster2 empfehlen! -
in: Gutes kostenloses Strategie Spiel?
geschrieben von basisa
Zählt bei dir OGame dazu, gibt ein App fürs iPad.
Es gibt Command and Conquer oder Jagged Alliance als Webspiel sowie als App Anno! -
in: Excel: Durch mehrere SVerweis-Ergebnisse Blättern
geschrieben von basisa
Am besten du nutzt ein Makro was man auf die Seite legt!
Beispiel fix aus dem Kopf! *update ( getestet )
Option Explicit Sub Suchen() Dim LetzteZeile, i As Integer Columns("H:J").ClearContents 'Löscht die alte Suche For i = 2 To 9 'Suche in Zeile 2 bis 9 LetzteZeile = ActiveSheet.Cells(Rows.Count, 8).End(xlUp).Row + 1 'Sucht die letzte beschriebe Zeile und Addiert + 1 If Cells(i, 1).Value = Range("D1").Value Then ' D1 ist das Suchfeld 'Beispiel, wenn im Feld A2 der geuschte Name steht! Cells(LetzteZeile, 8).Value = Cells(i, 1).Value 'Hier wird Quasi "A2" nach "H2" kopiert Cells(LetzteZeile, 9).Value = Cells(i, 2).Value 'Hier wird Quasi "B2" nach "I2" kopiert Cells(LetzteZeile, 10).Value = Cells(i, 3).Value 'Hier wird Quasi "C2" nach "J2" kopiert End If Next End Sub
